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1, ABSTHACT 

Tue function of the DMCll diagnostics is to verify that the 
option operates according to specifications. The diagnostics 
verf ly that there are no malfunctions and the all operations 
of the DMCILI are correct in its environment. 

Parameters tiust be set up to alert the diagnostics to the 
DMCU configuration. These parameters are contained in the 
STATUS TABLE and are generated in two waysi l) ^lanual 
Input • the operator answers questions, 2) Autosizlng - the 
program determines the parameters automatically, 

DZDmE test!!; the DMC-ll Line Unit CM820i or Xt 
performs write/read tests on the Dmc Line Unit registers* it 
checlcs for proper transmitter* receiver* and BCC operation in 
DDCmP mode. The modem signals are also checked, PZDml 
requires a DMC Mlcro*Processor (M8200 or M8204) to run. For 
best diagnosis a turn-around connector should be installed, 
however th€f diagnostic win run without it (some tests are 
skipped). 

Currently there are five off line diagnostics that are to be 
run in sequence to Insure that if an error should occur it 
will be detected at an early stage, 

note: Additional diagnostics may be added in the future. 
The five diagnostics arei 

1, DZDMC [REV] Basic W/R and Micro»processor tests 

2, DZDME IREV3 DDCMP Line unit tests 

3, DZDMF IREV] BITSTUFF Line Unit tests 

4, DZDMG CREV] Jump and Crom tests 

5, OZDMH [REV] Free»running tests (Heat test tape) 

2, REQUIREME^ITS 

2,1 EQUIPMENT 

Any PDPll family CPU (except an LSI»U) with minlmurr. 8K memory 
ASR 33 (or equlllvalent) 

DMCJI-AR with DMCll-DA or DMCU'FA or 
DMCll-AL with DMCli-MA or DMCll-MD 



PAGEl 0002 



Page 3 



2,2 STORAGE 

Procrram wm use all 8K of memory except where ABL and 
bhotSTPAP loader reside, Locations 1500 thru 1640j contain 
the "STATUS TABLE" Information which is generated at start ot 
diagnostics by manual input (questions) or automatically 
C auto-sizing) , This area is an overlay area and should not be 
altered by the operator, 

3, LOADING PROCEEDUBE 

3,1 MFTHOD 

All programs are in absolute format and are loaded using the 
ABSOLUTE LOADER, NOTEi if t^c diagnostics are on a media such 
as DISK , MAGTAPE, DECTAPEr or CASSETTE? follow instructions 
for the monitor which has been provided on that specific 
media, 

ABSOLUTE LOADER Starting address *bOO 

MFMOPy « SIZE 

4k: 17 

9k 37 

12k: 57 

16IC 77 

20k 117 

24k 137 

28k: 157 



1.1.1 Place address of ABS loader into s^i^itch register, 

(also place 'HALT' SW up) 

3.1.2 Depress 'LOAD ADDRESS' k:ey on console and release, 

3.1.3 Depress 'START KEY' on console and release (program should nov 
be loading into CPU) 
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a. Set switch register to 000200 

b. Depress 'LOAD ADDRESS* key and release 

c. Set SWR to zero for 'AUTO sizing* or Swr bltOsi for manual 
Input (questions) or swr bit7=l to use existing parameters 
set UP by a previous start or a previously run dmcu 
diagnostic, 

d. Depress 'START key* and release. The program will type 
Maindec Name and program name (if this was the first start 
up of the program) and also the folloi^ingt 

MAP OF DMCit STATUS 



PC CSR 5TAT1 STAT2 STAT3 



0011500 160010 145310 177777 000000 
001510 160020 145320 177777 000000 

The program will type 'R' and proceed to run the diagnostic. 
The above is only an example. This would indicate the status 
table starting at add, 1500 in the program. In this example 
the table contains the information and status of two DMCll^S, 
THE STATUS TABLE MUST BE VERIFIED BY THE USER IF AUTO SIZING 
IS DONE, for information of status table see section 8,4 for 
help. 

If the diagnostic was started with SWOOsl indicating manual 
parameter input then the following shows an example of the 
guestlons amked and some example answerst 

HOW MANY DMCU'S TO BE TESTED?! 
01 

CSR ADDRESS'n600lO 

VECTOR ADDRESS7310 

BR PRIORITY LEVEL? (4»5f6i7)?5 

DOES MICRO-PROCESSOR HAVE CRAM? (Y OR N)N 

WHICH LINE UNIT? IF NONE TYPE IF M8201 TYPE " 1 •» , IF 

M8202 TYPE '"'2"?l 

IS THE LOOP BACK CONNECTOR QN?Y 
SWITCH PAC#I (DDCMP LINE#)?377 
SWITCH PAC#:f! (BM873 BOOT ADD)7377 

Following the questions the status map is printed out as 
described above, the Information In the map reflects the 
answers to the questions. If the diagnostic was started with 
SwoosO and SW07sO ( AUTO-SIZING) then no questions are asked 
and only th«!i status-map is printed out. If AUTO-SIZING is 
used the jitatus information must be verified to be correct 
(match the hardware), if it does not matcn the hardware the 
diagnostic must be restarted with SW00=1 and the questions 
answered. 
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CONTHOL SWITCH SETTINGS 



SW 


15 


Set; 


sw 


14 


SetJ 


SW 


1 3 


set? 


sw 


12 


set! 


C It! 


1 I 


oe t 1 


SW 


10 


Seti 


SW 


09 


sett 


sw 


08 


sett 


sw 


07 


Seti 


sw 


06 


sets 


sw 


05 


sett 


sw 


04 


Sett 


sw 


03 


Sett 


sw 


02 


Sett 


sw 


01 


sett 


sw 


00 


Sett 



Halt on error 

Loop on current test 

Inhibit error print out 

Inhibit type out/abell on error. 

Inhibit iterations, Cqaicic pass) 

Escape to next test on error 

Loop with current data 

Catch error and loop on it 

Use previous status table. 

Halt in ROMCLK routine before cloc)cing 

fpicro^processor 

Reserved 

Reserved 

Reseiect DMCli's desired active 

hocK on selected test 

Restart program at selected test 

Build new status table from questions, (If sw07s0 

and SW0030 a new status table is built by 

auto^'Sizing) 



Switch 06 and 08-15 are dynafclc and can be changed as needed 

While the diagnostic is running. Switches 00-03 and switch 07 

are statiCf and are used only on starting or restarting the 
diagnostic. 
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4,1,2 SWITCH HEGISTEP OPTIONS Cat Start UP) 

SW 01 RESTART PROGRAM AT SELECTED TEST, It IS Strongly 
sug;jestea that at least one pass has been made before 
trying to select a test, the reason being Is that the 
pro;iram has to clear areas and set up parameters. 
When this switch Is used the diagnostic will ask TEST 
NO,? Answer by typing the number of the test desired 
and carrlge return to begin execution at the selected 
test, 

SW o2 LOCK ON SELECTED TEST, This switch When Used with 
swoi will cause the program to constantly loop on the 
selected test. Hitting any *cey on the console will 
let it advance to the next test and loop until a key 
is hit again. If SW02sO when Sv^Ol is used. The 
program will begin at the selected test and continue 
normal operations, 

SW 03 BESICLECT DMGll'S DESIRED ACTIVE, Please note that a 
mesiiage is typed out for setting the switch register 
equ^il to DMCll's active, this means if the system has 
four DMCllsi bits 00,01,02/03 will be set in loc 
•DMACTV from the switch register, using this 
switchCSWOO) alters that locatlonj therefore if four 
DMCUs are in the system »##D0 not»»» set switchs 
greater than SW 03 in the up position, this would be 
a fatal error, do not select more active DMClls than 
there is information on in the status table. 



METHODt Ai Load address 200 

Bi start with SW oo=l 

Ct Program will type message 

Di set a switch for each DMC desired active, 

EXAMPLES If you have 4 DMCs but only want to 
run the first and the last set 5WR bits and 
3 » 1, PRESS CONTINUE 

El Number (IF VALID) will be in data lights 

texcludlng 11/05) 

Ft set with any other switch settings desired, 

PRESS CONTINUE, 
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4,1,3 DYNAMIC SWITCHES 



ERROR SWITCHES 



1. 


sw 


12 


Delete print out/bell on error. 


2. 


5W 


13 


Delete error printout. 


3. 


SW 


15 


Halt on tne error. 


4. 


SW 


08 


Goto beginning o£ the testcon error). 


5. 


sw 


10 


Goto next testCon error). 



SCOPE SWITCHES 



1, SW06 Halt in ROMCLK routine before cloclcing 

micro-processor instruction. This allows the 
operator to scope a mlcro»processor instruction in 
the static state before it is cloclced. Hit 
continue to resume running, 

2, SW09 (if enabled by 'SCOPl') on an error; If an is 

printed in front of tha test no, (ex, #TE:st no, 
10 ) SW09 is incorpsrated in that test and 
therefore SW09 is usually the best switch for the 
scope loop (SW14*0i SWlDsO, SW09=1, SW08C03, If 
SW09 is not enabeled; and there is a HAPD error 
(constant); SW08 is oest, (SWi47l|0f SWIO^O, 
SW09a!0f swoeal), for int ermi t temt errors; swi4=l 
will loop on test reguirdiess of error or not 

error, (SW14b1, SWlOad SW09=0r SW08al,0) 

3, swil Inhibit interations, 

4, SW14 Loop on current test. 



4,2 STARTING ADDRESS 

Starting address is at 000200 thera are no other starting 
addresses for the OMCll diagnostics , (See Section 4,0) 



NOTEi If address 000042 is non*zero the program assumes it 

is under ACTll or XXOP control and will act 

accordingly after all available Dmcu's are tested the 
program will return to 'XXDP' or 'ACT-11', 



S, OPERATING PROCEDURE 



When program is initially started messages as described in 
section 4,0 will be printedr and program win begin running 
the diagnostic 
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5t2 PROGRAM ANiD/OP OPERATOR ACTION 

The typical approach should be 

1, Halt on error (via SW ISsl) when ever an error occurs, 

2, Cl(?ar SW 15. 

3, Set SVi I4i Cloop on this test) 

4, Set SW 131 (inhibit error print out) 

The TEST NUMBER and PC Will be typed out and Posslbiiy an 
error mesisage (this depends on the test) to give the operator 
an idea as to the source of the problem, It is necessary 
to know more information concerning the error report? LOOK in 
THE LISTING for that TEST NUMBER Which was typed out and then 
NOTE THE PC Of thE ERROR REPORT this way the EXACT FUNCTION of 
the test CAN BE DETERMINED,, 

6, ERRORS 

As descrlb<iid previously there will always be a TEST number and 
PC typed oyt at the time of an error (providing 5W I3e0 and SW 
12=0) • in most cases additional Information will be supplied 
in the the error message to give the operator an indication of 
the error, 

6,2 ERROR RECOVERY 

If for some reason the DMCll should 'HANG THE BUS' (gain 
control of bus so that console manual functions are Inhibited) 
an init or power down/up Is necessary for operator to regain 
control of cpu. If this should happen? looic In location 
'TSTNO' (address i226)for the number of the test that was 
running at the time of the catastrophic error. In this way 
the operator will have an Idea as to what the DMCU was doing 
at the time of the error, 

7. RESTRICTIONIS 

7,1 STARTING RESTRICTIONS 

See section 4, (PLEASE) 

Status table should be verified reguardless of how program was 
started. Also it is Important to use this listing along with 
the Information printed on the TTY to compietly isolate 
problems. 



Page 9 



7.2 OPERATING RESTRICTIONS 

The first time a DMCll diagnostic is loaded Into core and run 
the STATUS TABLE must be set UP, This is done by manual input 
(S^oOsl) or by autosizing (Swoo=0 and SW075s0}. Thereafter 
however the status table need not be setup by subsequent 
restarts or even loading the next dmc diagnostic because the 
St;\tUS TABLE is overlayedt The current parameters in the 
STATUS TABLE are used when SWOTal on start up, 

7.3 HARDWARE CONFIGURATION RESTRICTIONS 

DMCil{M8200)-' Jumper Wl must be In,, and switch 7 of E76 must 
be in the OFF position, 

KMC(M8204)» Jumper Wl must be in, 

LINE UNIT(M8201)- Jutppers wi# W2f and W4 must be IN, Jumpers 
W3, and W5 must be. OUT, SW8 of E26 must oe in the ON 
position, 

LINE UNIT (M8202)- Jumper Wl must be in, SW8 o£ E26 must be 
in the OFF position. 

8, MISCELLANEOUS 

8.1 EXECUTION TIME 

All DMCll device diagnostics will give an 'END PASS' message 
(providing no errors and swl2=0) within 4 mins. This is 
assuming SWil=l (DELETE ITERATIONS) Is set to give the fastest 
possible execution. The actual execution time depends greatly 
on the PDPll CPU configuration and the amount of memory in the 
system. 

8.2 PASS COMPLETE 

NDTFi EVERY time the program is started; the tests will run 
as if swii (delete' iterations) was up (=1), This is to 
'VERIFY NO HARD ERRORS^ as soon as possible. Therefore the 
first pass -EACH TIME PROGRAM IS STARTED* Will be a 'QUICK 
PASS' until all DMCll's in systtm are tested, when the 
diagnostic has completed a pass the following is an example of 
the print out to be expectedt 

E"JD PASS DZDMC CSRi 175000 VECl 0300 PASSES! OOOOOl 
ERRORSI 000000 

NOTEi The pass count and error counts are cummulltive for 
each OMCll that is running* and are set to zero only 
When the diagnostic is started. Therefore after an 
overnight run for example* the total passes and errors 
for each DMCll since the diagnostic was started are 
reflected in PASSESi and ERRORSr. 
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8.4 



KEY L0CATTUN5 



KE'TURM (1214) 

NEXT (1216) 

TSTNO (1226) 

RUN (1316) 



DMCR00*DMCin7 
DMST00-DMST17 
(1500)-(1640) 



DMACTV (1306) 



DMCSR (1402) 



Contains the address where program will return 
when iteration count is reached or if loop on 
test is asserted. 



Contains the address of the next 
peformed. 



test to be 



Contains the number 
pef ormed. 



^of the test now being 



The bit in 'RUN^ always points to the DMCU 

currently being tested, EXAMplEi (RUN) 

1302/0000000001000000 Means that DMCll no. 06 
is the DMCll now running. 



These locations contain the Information needed 
to test up to 16 (decintal) DMCUs sequentialy, 
they contain the CSF^VECTOR and status 
concerning the configuration of each DMCll, 

Each bit set in this location Indicates that 
the associated OMCll will be tested in turn, 
EXAMPLEl (DMACTV) 1276/0000000000011111 means 
that DMCll no, 00,ol,02f 03^04 will be tested, 
EXAMPLE* (DMACTV) 1276/0000000000010001 Means 
that DMCll no, 00,04 will be tested, 



Contains the CSR of the 
test. 



current DMCH under 



8,4A 'STATUS TABLE" (1500-1640) 

The table is filled by AUTO SIZING or by the manual parameter 
input (questions) as described previously. Also if desired by 
useri the locations may be altered by hand (toggled in) to 
suit the specific configuration. 

The example status map shown below contains inforniation for 
two DMCll'S, the table can contain up to 16 DMCIl'S. 
Following the map is a description of the bits for each map 
entry 



MAP OF DMCll STATUS 



PC CSR STATl STAT2 STAT3 

mm mmm mmw^m <ir»wi»« 

001500 160010 145310 Mini 000000 

001510 160020 016320 000000 000000 



aGEj 0010 
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Each map entry contains 4 words Ahlch contain the status 
Information for 1 DMCll, The PC shows where In core memory 
the first of the 4 words Is, In the example above the first 
DHC'S status Is In locations* 1500, 1502^ 1504, and 1506, The 
second DMC status Is located at 1510, 151?, 1514, and 1516, 
The Information contained In each 4 word entry is defined as 
foliowsi 

CSPf Contains DMCll CSR address 

STATU BITS 00-08 IS DMCll VECTOR ADDRE'SS 
BXT15»1 MICRO-PROCESSOR HAS CRAM 
BIT15«0 MICRO-PROCESSOR HAS CROM 
BIT14«1 TURNAROUND CONNECTOR IS ON' 
BIT14a0 NO TURNAROUND CONNECTOR 
BIT13aO LINE UNIT IS AN M8201 
BIT13S1 LINE UNIT IS AN M8202 
BITl2al NO LINE UNIT 

BITS 09-11 IS DMCll BR PRIORITY LEVEL 

STAT2I LOW BYTE IS SWITCH PACfl (DDCMP LINE NUMBER) 
HIGH BYTE IS SWITCH PAC#2 (BM873 BOOT ADD) 

STAT3I BITOBl RUN FREE RUNNING TESTS ON KMCll 
BITlaO DMCll-AR CLOW SPEED) 
BITlsl DMCll-AL (HIGH SPEED) 
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8.5 METHOD OF AUTO SIZING 

8.5.1 FINDING THE CONTROL STATUS REGlSTEP, 

The auto»slzing routine finds a DMCU as folXowsi It starts 
at address 160000 and tests all address In Increments of lo up 
to and including address 167760, If the address does not time 
out, the following Is done# the first CROM address is written 
to a 125252 then it Is read bacic. If it contains a -1 or 
125252 or 626 or 16520 a DMCll has been found, if not, the 
address is updated by 10 and the search continues, A -l 
indicates a DMCll with no CROM or Cram, a 125252 Indicates a 
KmCH with CRAMf a 626 Indicates a DMCll-AL end a 16520 
Indicates a DMCll*AR, Further tests are perforrned at this 
point to determine which line unlt# If any, Is Installed, If a 
loop-back connector 1$ Installed and various switch settings 
on the line unit, THIS IS WHY THE STATUS TABLE MUST BE 
VKPIFIED BY THE USER AND IF ANY OF THE INFORMATION DOES NOT 
AGREE WITH THE HARDWARE THE DIAGNOSTIC MUST BE RESTARTED AND 
THE QUESTIONS MUST BE ANSWERED, All DMCll's In the system 
will be found by the autO'»'Slzer , If It does not find a dmciI 
the diagnostic must be restarted and the questions answered, 

8.5.2 FINDING THE VECTOR AND BR LEVEL 

The vector area (address 300-776) is filled with the 
Instruction lOT and *,+2*' (next address). The processor 
status Is started at 7 and the DMC is programmed to interrupt. 
The PS is lowered by I until the DMC Interrupts, a delay Is 
made and if no Interupt occures at PS level 3 (because of a 
bad DMCll) the program assumes vector address 300 at BR level 
5 and the problem should be fixed In the diagnostic. Once tne 
problem Is flxedy the program should be re-setup again to get 
correct vector. If an Interupt occured; the address to which 
the DMCU Interupted to Is picked up and reported as the 
vector, NOTE! If the vactor reported Is not the vector set 
up by youj there Is a problem and AUTO SIZING should not be 
done • 

8.6 SOFTWARE SWITCH REGISTER 

If the diagnostic is run on an 11/04 or other CPU without a 
switch register then a software switch register Is used to 
allow user the same switch options as described previously. 
If the hardware switch register does not exist or If one does 
and it contains all ones (177777) this software switch 
register is used, 

Controli 

To obtain control at any allowable time during execution of 
the diagnostic the operator types a CTRL G on the console 
terminal Iceyboard, As soon as the CTRL G Is recognized, by 
the diagnostic* the following message will be dlsplayedi 
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SWpsXXXXXX NEW? 

Where XXXXXX Is the current contents of the software switch 
register In octal. The software control routine will then 
await operator action. At which time the operator is required 
to type one or more of the legal charactersi 1) * 7r 2) 
line feed(<LF>)f 3) carriage returnC<CR>) , or 4) control-u 
(CTRL U), No check is made for legality. If the input 
character Is not a <LF># <CR>i or CTRL u It is assumed to be 
an octal digit. 

To change the contents of the SSR the operator simply types 
the new desired value in octal « leading zeros need not be 
typed. And terminates the input string with a <CP> or <LF> 
depending on the program action desired as described below. 
The input value will be truncated to the last 6 digits typed. 
At least one digit must be typed on any given input string 
prior to the terminator before a change to the SSR will occur. 

When the Input string is terminated with a <CR> the diagnostic 
will continue execution from the point at which it was 
Interrupted, If a <CR> Is the only thing typed the program 
will continue without changing the sSR, The <LF> differs from 
the <CR> by restarting the program as if it were restarted at 
address 200, 

If a CTRL U is typed at any point in the input string prior to 
the terminator the input value will be disregarded and the 
prompt displayed (SWr s XXXXXX NEW?), 

To set the SSR for the starting switches, first load the 
dlagnostlCf then hit CTRL G/ then start the diagnostic. 
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1667 TEST 1 

OUT CONTROL REGISTER READ/ONLY TEST 

DO A MASTER CLEARf VERIFY THAT ALL READ/ONLY 

BITS ARE IN THE COPRECT STATE 

1691 TEST 2 

IN CONTROL RECISTEF READ/ONLY TEST 
DO A MASTER CLEAR, VERIFY THAT ALL READ/ONLY 
BITS ARE IN THE CORRECT STATE 

1714 TEST 3 ########***#»if*###*#*###### 

MODEM CONTROL REGISTER READ/ONLY TEST 

DO A MASTER CLEAR/ VERIFY THAT ALL READ/ONLY 

BITS ARE IN THE CORRECT STATE 

1738 TEST 4 

MAINTENANCE REGISTER READ/ONLY TEST 

DO A MASTER CLEARf VERIFY THAT ALL READ/ONLY 

BITS ARE IN THE CORRECT STATE 

1769 TEST 5 

LINE UNIT REGISTER WRITE/READ TEST 
SET BITS IN LU REGISTER 12, VERIFY IT IS SET 
CLEAR BITS IN LU REGISTER 12# VERIFY IT IS CLEAR 

J 811 TEST 6 

LINE UNIT REGISTER i^RITE/READ TEST 
SET BITl IN LU REGISTER 17# VERIFY IT IS SET 
CLEAR BITl IN LU REGISTER 17f VERIFY IT IS CLEAR 

1853 ##«#####«>##4^*######»##«»#« TEST 7 
LINE UNIT REGISTER aIRITE/READ TEST 
FLOAT A 1 THROUGH LINE UMT REGISTER 13 
FLOAT A THROUGH LINE UNIT REGISTER 13 

1911 ##<f########*#####*» TEST 10 
LINE UNIT REGISTER ^RITE/READ TEST 
FLOAT A 1 THROUGH LINE UNIT REGISTER 14 
FLOAT A THROUGH LINE UNIT REGISTER 14 

1963 TEST 11 

SWITCH PAC TEST 
THIS TEST READS SWITCH PAC#1 

THIS SWITCH PAC CONTAINS THE DDCMP LINE # 
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1985 TEST 12 

SWITCH PAC T£ST 

THIS TEST READS SWITCH PACI2 

THIS SWITCH PAC CONTAINS THE BM873 BOOT ADD 

2007 TEST 13 

LINE UNIT CLOCK TEST 

THIS TEST VEPIFYS THAT THE LU INTERNAL CLOCK 
(BIT 1 IN LU-17) IS WOPKING 

2040 TEST 14 «##########*##########^f 

OUT DATA SILO TEST 
SET SOM AND LOAD OUT DATA SILO 
VEPIFY THAT OCOR SET, INDICATING THAT THE 
CHARACTER IS AT THE BOTTOM OF THE OUT SILO 

2073 TEST 15 

DDCMP TEST OF RTS AND OUT ACTIVE 
SET 50M AND LOAD OUT DATA SILO 
SINGLE STEP 2 DATA CLOCKS, VERIFY 
THAT RTS AND ACTIVE APE SET 

2117 TEST 16 

TEST OF OUT CLEAR 
SET SOM AND LOAD OUT DATA SILO 
SINGLE STEP DATA CLOCK, SET OUT CLEAR 
VERIFY THAT OCOR, RTS, AND ACTIVE ARE CLEARED 

2174 ##########«###*###««###### TEST 17 
DDCMP TRANSHITTER TEST 
SINGLE CLOCK THE CHARACTER 
VERIFY EACH BIT POSITION AS IT 
PASSES THE BIT WINDOW (SI BIT) 

ON AN ERROR, 1^3 CONTAINS BIT POSITION OF FAILURE 

2225 «#«#»#«####»#*##*##«'##«### TEST 20 
DDCMP TRANSMITTER TEST 
SINGLE CLOCK THE CHARACTER 125 
VERIFY EACH BIT POSITION AS IT 
PASSES THE BIT WINDOW (SI BIT) 

ON AN ERROR, R3 CONTAINS BIT POSITION OF FAILURE 

2276 TEST 21 

DDCMP TRANSMITTER TEST 
SINGLE CLOCK THE CHARACTER 252 

.2279 VERIFY EACH BIT POSITION AS IT 
PASSES THE BIT WINDOW (SI BIT) 

ON AN ERROR, R3 CONTAINS BIT POSITION OF FAILURE 
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2327 TEST 22 »#«#«*«####*«#«^*«##«#«##«#« 

DDCMP TRANSMITTER lEST 
SINGLE CLOCK THE CHARACTER 377 
VERIFY EACH BIT POSITION AS IT 
PASSES THE BIT WINDOW (SI BIT) 

0^ AN ERROR, R3 CONTAINS BIT POSITION OF FAILURE 

2378 TEST 23 «####«#*«######*«###«#««^#«« 

DDCMp TRANSMITTER TEST 
SINGLE CLOCK A BINARY COUNT PATTERN 
VERIFY EACH BIT POSITION AS IT 
PASSES THE BIT WINDOW (SI BIT) 

ON AN ERROR, R3 CONTAINS BIT POSITION OF FAILURE 
AND R5 CONTAINS THE CHARACTER THAT FAILED 

2439 TEST 24 

DDCMp STRIP SYNC TEST 
SET LU LOOP, SINGLE STEP 5 SYNCS* 
VERIFY THAT IN ACTIVE DOES NOT SET 

2467 TEST 25 

DDCMP IN ACTIVE TEST 

SET LU LOOP, SINGLE STEP 5 SYNCS AND A NON-SYNC (301) 
VERIFY THAT IN ACTIVE IS SET 

2495 TEST 26 

DDCMP IN ACTIVE TEST 

SET LU LOOP, SINGLE STEP 1 SYNC AND A NON-SYNC (301) 
VERIFY THAT IN ACTIVE DOES NOT SET 

2523 TEST 27 

DDCMp IN ACTIVE TEST 

SET LU LOOP, SINGLE STEP 2 SYNCS AND A NON-SYNC (301) 
VERIFY THAT IN ACTIVE IS SET 

2551 TEST 30 

IN CLEAR TEST 

SYNC Up RECEIVER AND TRANSMIT A CHARACTER 

WAIT FOR IN RDY, THEN SET IN CLEAR 

VERIFY THAT IN ACTIVE AND IN RDY ARE CLEARED 

2600 #»####»##########*#####«## TEST 31 
DDCMP BASIC RECEICER TEST 

SYNC up RECEIVER AND SINGLE CLOCK THE CHARACTER 

VERIFY THAT IN RDY IS SET, AND THAT THE CHARACTER WAS RECEIVED 

2637 TEST 32 

DDCMP BASIC RECEICE^ TEST 

SYNC UP RECEIVER ANO SINGLE CLOCK THE CHARACTER 125 

VERIFY THAT IN RDY IS SET, AND THAT THE CHARACTER ^AS RECEIVED 
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2674 TEST 33 

DDCMp BASIC BECEICEP TEST 

SYNC UP RECEIVER AND SINGLE CLOCK THE CHARACTER 252 

VERIFY THAT IN RDY IS SET, AND THAT THE CHARACTER WAS RECEIVED 

2711 TEST 34 

DDCMP BASIC RECEICER TEST 

SYNC UP RECEIVER AND SINGLE CLOCK THE CHARACTER 377 

VERIFY THAT IN RDY IS SET, AND THAT THE CHARACTER WAS RECEIVED 

2748 #»#######»################ TEST 35 
DDCMp DATA TEST 

THIS TEST SINGLE STEPS A BINARY COUNT PATTERN 
CHECKING EACH CHARACTER AS IT IS RECEIVED 

27137 TEST 36 

DDCMP DATA TEST 

THIS TEST SINGLE STEPS A BINARY COUNT PATTERN 
CHECKING EACH CHARACTER AS IT IS RECEIVED 
THIS TEST IS EXACTLY THE SAME AS THE LAST TEST, 
EXCEPT LINE UNIT LOOP IS SET IN LU REGISTER 12 

28 31 TEST 37 

TRANSMITTER MARK TEST 

SINGLE CLOCK 3 SYNCS AND A 301 AND 20 EXTRA 
CLOCK TICKS, VERIFY THAT A 301# A 377 AND A 377 
WERE RECEIVED INDICATING THAT THE TRANSMITTER WENT 
TO A MARK STATE FOR 16 BITS WHEN OUT SILO WAS EMPTY 

2876 TEST 40 

CABLE TURNAROUND TEST 
CLEAR LINE UNIT LOOP, SET DTR 
VERIFY THAT MODEM READY IS SET 
CLEAR DTRf VERIFY THAT MRDY IS CLEARED 

2924 TEST 41 

CABLE TURNAROUND TEST 

CLEAR LINE UNIT LOOP, LOAD OUT DATA SILO 
VERIFY THAT ALL MODEM SIGNALS APE SET 

2967 TEST 42 

TEST OF CRC OPERATION 

USING THE CRC16 POLYNOMIAL, SINGLE CLOCK THE CHARACTER 
0, VERIFY THE LSB OF THE BCC ON EACH SHIFT 
TEST TRANSMITTER FIRST THEM THE RECEIVER BCC 

3042 TEST 43 

TEST OF CRC OPERATION 

USING THE CRC16 POLYNOMIAL, SINGLE CLOCK THE CHARACTER 
377, VERIFY THE LSB OF THE BCC ON EACH SHIFT 
TEST TRANSMITTER FIRST THEN THE RECEIVER BCC 
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3117 TEST 44 ■»n<'i^#«* 

TEST OF CPC OPERATION 

31 J9 USING THE CRC16 POLYNOMIAIi, SINGLE CLOCK THE CHARACTER 
125# VERIFY THE LSl> OF THE BCC ON EACH SHIFT 
TEST TRANSMITTER FIWST THEN THE KKCEIVER BCC 

3192 TEST 45 

TEST OF CRC OPERATTON 

USING THE CRC16 POLYNOMIAL, SINGLE CLOCK THE CHAHACTER 
252i VERIFY THE LSB OF THE BCC ON EACH SHIFT 
TEST TRANSMITTER FIRST THEN THE RECEIVER BCC 

3367 TEST 46' 

TRANSMITTER CRC TEf,T 

USING THE CRC16 POLYNOMINAL, SINGLE CLOCK A BINARY 

COUNT PATTERN, VERIFY THE LSB OF THE TRANSMITTER BCC ON EACH SHIFT 

3333 TEST 47 

RECEIVER CRC TEST 

USING THE CRC16 POLYNOMINAL, SINGLE CLOCK A BINARY 

COUNT PATTERN, VERIFY THE LSB OF THE RECEIVER BCC ON EACH SHIFT 

3399 TEST 50 

TRANSMITTER DDCMP CRC TEST 

THIS TEST TRANSMITS A FOUR CHARACTER MESSAGE WITH CHC 
BOTH DATA AND THE ECC ARE VERIFIED IN THE BIT 
WINDOW, THE FOUR ChARACTEHS ARE 0, 125 , 252# 377 

THE TRANSMITTER IS CHECKED FOR GOING TO A MARK STATE AFTER THE BCC 

3500 TEST 51 

RECEIVER DDCMp CRC TEST 

THIS TEST CLOCKS A FOUR CHARACTER MESSAGE WITH BCC 
AND VERIFYS CORRECl DATA RECEPTION AND BCC MATCH 
THE FOUR CHARACTER MESSAGE IS , 1 25 # 25 2 # 37 7 

3557 TEST 52 

DDCMP EOM FUNCTION TEST 

THIS TEST LOADS OUI SILO WiTHi 7 SYNCS, 4 CHAR MESSAGE, EOM 

4 CHARACTER MESS,ECM, THE DATA STREAM IS CHECKED TO BE 

4 CHAR, BCC, 4 CHAR, ECC , MARKS , THIS TEST VERIFYS THAT 

THE CHARCTERS LOADED WITH EOM SET ARE LOST 

ALL DATA AND BCC'S ARE CHECKED IN THE BIT WINDOW 

THE FOUR CHARACTER MESSAGE IS , X25 , 252# 377 

RECEIVED DATA IS VERIFIED, AND IN BCC MATCH IS CHECKED 

3903 TEST 53 

DDCMP EOM FUNCTION TEST 

THIS TEST LOADS OUT SILO wiTHi 2 SYNCS, 4 CHAR MESSAGE, EOM 

S0M,4 CHAR MESS, EOM, THE DATA STREAM IS CHECKED TO BE 

4 CHAR, BCC, 4 CHAR, BCC, MARKS. THIS TEST VERIFYS THAT 

THE CHARCTERS LOADED WITH EOM SET ARE LOST 

ALSO THAT THE CHAP LOADED WITH SOM IS NOT IN THE BCC 

ALL DATA AND BCC'S APE CHECKED IN THE BIT WINDOW 
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THE FOUR CHARACTER MESSAGE IS 0# 125r 252* 377 

RECEIVED DATA IS VERIFIED, AND IN BCC MATCH IS CHECKED 

4081 TEST 54 

EMRT^f SltiO TEST 

LOAD SILO WITH 2 SYNCSf 4 CHAR MESSAGE, SINGLE CLOCK 
UNTIL THE SILO IS EMPTY, LOAD 4 MORE CHARACTERS IN TH??: 
SILO, GIVE MORE TICKS, AND VERIFY THAT ONLY THE FIRST 
4 CHARACTER MESSAGE WAS RECEIVED AaVO THAT HTS IS CLEAR 

4146 »#########«#»############# TEST 55 
HALF DUPLEX TEST 

SET LINE UNIT LOOP AND HALF DUPLEX, SEND SYNCS AhD A 
MESSAGE. VERIFY THAT IN-ACTIVE AND' IN-READY ARE CLEAR 

4181 TEST 56 

DDCMP CABLE DATA TEST 

4183 THIS TEST LOADS OUT SILO WITH THE FOLLOWINGi 
4 SYNCS, 16 CHAR,E0M,i6 CHAR,E0M,16 CHAR,EOM 
THE 16 CHARACTERS INCLUDE A FLOATING ONE AND ZERO 
THE DATA IS TRANSMITTED OVER THE CABLE USING THE INTERNAL CLOCK 
RECEIVED DATA IS VERIFIED AS IS IN BCC MATCH 
LOOP-BACK CONNECTOR MUST BE ON TO RUN THIS TEST 

4276 ##################«#####«# TEST 57 
DDCMP CABLE DATA TEST 

THIS TEST LOADS OUT SILO WITH THE FOLLOWING! 

4 SYNCS#59 DATA CHARACTERS, EOM WITH GARBAGE CHARACTER 

THE DATA IS TRANSMITTED OVER THE CABLE USING THE INTERNAL CLOCK 

RECEIVED DATA IS VERIFIED AS IS IN BCC MATCH 

LOOP-BACK CONNECTOR MUST BE ON TO RUN THIS TEST 



I 
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I 
2 

4 
5 
6 
7 
8 
9 

io 
11 

12 
13 
14 
15 
16 
17 
19 
19 
20 
21 
22 
23 
24 
25 
2^ 
27 
2B 
29 
30 
31 
32 
33 
34 
35 
36 
37 
38 
39 
40 
41 



43 
44 
45 



100000 
040000 
020000 
010000 
004000 
002000 
001000 
O00400 
000200 
000100 
000040 
000020 
000010 
000004 
000002 
000001 
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INTRODUCTION TO DNCll DIAGNOSCTIC 



j»MAINDEC"ll-DZDHE-B DMCll DDCHP LINE UNIT TESTS 
I*COPTfRIGHT 1976» DIGITAL EQUIPMENT CORP,, MAYNARD, 
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MASS, 01754 



r STARTING PROCEDURE 

»LOAD PROGRAM 

thOhd ADDRESS 000200 

|SWR=0 AUTOSIZE DHCll 

fSW073l USE CURRENT DMCll PARAMETERS 

fSW00»l INPUT NEW DHCil PARAMETERS 

J PRESS START 

^PROGRAM WILL TXPE "HAINDEC-1 1-D2DHE-B DMCll DDCHP LINE UNIT TESTS" 
^PROGRAM WILL TYPE STATUS MAP 

jPROGRAH WILL TYPE "R" TO INDICATE THAT TESTING HAS STARTED 
jAT THE END OF A PASS, PROGRAM WILL TYPE PASS COMPLETE MESSAGE 
I AND THEN RESUME TESTING 

f SUBSEQUENT RESTARTS WILL NOT TYPE PROGRAM TITLE 



t SNITCH REGISTER OPTIONS 
J" - 

SW15«100000 

Sni4*4C0C0 
SW13S20000 
SW12S10000 
SWUa4000 
SW10B2000 
SW09>1000 
SW08»400 
5W07B200 
SW06S100 
SW05>40 
SW04«20 

SW02«4 
5W01S2 
SW00«1 



■IrHALT ON ERROR 
sl,LCO? ON CURRENT TEST 
»l, INHIBIT ERROR TYPEOUT 
■1#DELETE TYPEOUT/BELL ON ERROR, 
■1, INHIBIT ITERATIONS 
»i, ESCAPE TO NEXT TEST ON ERROR 
■liLOOP WITH CURRENT DATA 
■1,L00P ON ERROR 

«1,USE CURRENT DMCll PARAMETERS, sOfAUTOSIZE DMCll 
»1, HALT BEFORE CLOCKING MICRO-PROCESSOR INSTRUCTION 



jRESELECT DMCll 'S TO BE TESTED (ACTIVE) 

Ilock'on'test'select 
j restart program at selected test 

f INPUT DMCll PARAMETERS 
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46 
47 
4S 
49 
50 
51 
52 
53 
54 
55 
56 
57 
58 
59 
60 
61 
62 
63 
64 
65 
66 
67 
68 
69 
70 
71 
72 
73 
74 
75 
76 
77 
78 
79 



81 
82 
83 
84 
85 
86 
87 
88 
89 
90 
91 
?2 

94 
95 
96 
97 



000000 
000001 
000002 
000003 
000004 
000005 
000006 
000007 



177776 
001200 



005746 
005726 
010046 
012600 
024646 
022626 



lOOOOO 
040000 
020000 
010000 
004000 
002000 
OOlOOO 
000400 
000200 
000100 
000040 
000020 
000010 



000002 
000001 
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GENERAL DEFINATIONS AND EQUIVALENCIES 



JPEGISTER DEFISITIQNS 
J .................... 



paGEi 00j(2 



R0«%0 
R1»%1 
R2a%2 
R3«%3 
R4«%4 
R5«%S 
SPa%6 
PC»%7 



f GENERAL REGISTER 

fGENERAL REGISTER 

I GENERAL REGISTER 

jGENERAL REGISTER 

rGENERAL REGISTER 

fGENERAL REGISTER 
fPROCESSOR STACK POINTER 

I PROGRAM COUNTER 



r LOCATION EQUIVALENCIES 



PS«177776 
STACKS1200 



I PROCESSOR STATUS WORD 
fSTART OF PROCESSOR STACK 



y INSTRUCTION DEFINITIONS 



PUSH1SP«5746 

P0Pi5Pa5726 

PU5HR0S10046 

POPRO»12600 

PUSH2SP«24646 

P0P2SPa22626 

.EQUIV ENTrHLT 

yBIT DEFINITIONS 
, ............... 

BIT1S«100000 

BIT14a40000 

BIT13>20QOO 

BIT12>iaOOO 

BIT11»4000 

BIT10O2000 

BIT9«1000 

BIT8B400 

BIT7»200 

BtT6nl00 

6IT5B40 

6IT4>20 

BIT3S10 



I DECREMENT PROCESSOR STACK 1 WORD 
f INCREMENT PROCESSOR . STACK 1 WORD 
JSAVE RO ON STACK 
IRESTORE RO FROM STACK 
r DECREMENT STACK TWICE 
r INCREMENT STACK TWICE 
fBASIC DEFINITION OF ERROR CALL 



BIT1»2 
BITOal 
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PAUE; 0D23 



98 








P9 








inO 








1 01 








H'2 








103 








10 1 








tos 








1 Ob 








ti>7 








10» 




000000 




109 








110 








111 








1 1 2 




000024 




U3 


000024 


005336 




114 


000026 


000340 




115 


000030 


004750 




1 16 


000032 


000340 




1 1 7 


000034 


004716 




lie 


000036 


000340 




1 19 




000040 




120 


000040 


000000 




121 


000042 


000000 




122 


000044 


000000 




123 


0O0046 


003522 




124 




000052 




175 


000052 


000000 




126 








127 




000174 




12« 


OO0174 


000000 




1?<) 


000176 


000000 




130 








131 




000200 




1 32 


000200 


000137 


002002 


133 








134 








135 




001000 




1 36 


001 000 


005377 


040515 


(2) 


001025 


104 


041515 


(2) 








137 




001200 




138 








139 








140 








141 








142 


001 200 


177570 




143 


001202 


177570 





047tU 
030461 



- 

ITRAPCATCAEB FOH ILLEGAL iNTERPlfpTS 
(THE STANDARD "TRAP CATCHER" IS PLACED 
jBETWEEN ADDRESS TO ADDRESS 776. 
;IT LOOKS LIKE "pC+2 HALT". 
. .... ................... .... 

.«o 

} STANDARD INTERRUPT VECTORS 
, .................. 



.«24 



.«4Q 



,PFAIL 
340 
,HliT 
340 

,TRP5RV 
340 





SENDAD 



,»174 

DISPREGtO 
SWREGl 



JMP 



.«1000 

MTITLEl .ASCII 
.ASCZZ 



.START 



IPQWER FAIL HANDLER 

I SERVICE AT LEVEL 7 

1 ERROR HANDLER 

ISEPVICE AT LEVEL 7 

;GENERAL HANDLER DISPATCH SERVICE 

jSERVICE AT LEVEL 7 

ISAVE FOR ACT-ll OR XXDP 

» RETURN ADDRESS IF UNDER ACT-ll OR XXDP 
jSAVE rop ACT-ll OR XXDP 
iFOR USE WITH ACT-ll OR XXDP 

»ACT-U PROGRAM CHARACTERISTICS 



I SOFTWARE DISPLAY REGISTER 
^SOFTWARE SWITCH REGISTER 



J GO TO START OF PROGRAM 



<377><12>/MAINDEC-U-DZDME-8/<377> 
/DMCU DDCMP LINE UNIT TESTS/<377> 



(INDIRECT POINTERS TO SWITCH REGISTER AND LIGHT DISPLAY 
, ....................... ... ... ........ ... 



DISPLAY! 177570 
SWRi 177570 
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144 
1 45 
1 4b 
147 



1 48 
149 
ISO 
151 
152 
153 
154 
155 
156 
157 
158 
159 
160 
I6t 
162 
163 
164 
165 
1 fob 
167 
168 
1*9 
170 
171 
172 
!73 
174 
175 
176 
177 
I7f! 
179 
1 90 
181 
192 
183 
184 
185 
1 86 
187 
IBS 
1 89 
190 
191 
192 
193 
194 
195 
196 



001204 
001206 
001210 
001212 



00121 4 
001216 
001220 
001222 
001224 



177560 
177562 
177564 
177566 



000000 
000000 
000000 
000003 
000000 



001226 000000 
Onl230 000000 



001232 
001234 



001236 
001240 
001242 
001244 
001246 
001250 
001252 
O01254 
001256 
O01260 
001 262 

noi?&4 

001266 
001270 
001272 
001274 
001276 
OD1300 
001302 
O01304 
001306 
OOUlO 
fiOl3l2 
001 314 
001316 

001 320 
001322 



000000 
000000 



ooonoo 

000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000001 
000000 
000001 
OOOOOl 
000001 
OOOOOl 
000000 

001472 
001676 
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PROGRftV PARAMETERS, VARIABLES, AND TRAP CALLS. 



(INDIRECT POINTERS TO TELETYPE VECTORS AND REGISTERS 



PAGEl 0G24 



TKCSRt 177560 

TKOBRi 177562 

TPCSRI 177564 

TPDBRI 177566 

(PROGRAM CONTROL PARAMETERS 
........................... 



RETURN! 

NEXTI 

LOCK! 

ICOUNTI 

LPCNTI 

TSTNOl 

PASCNTt 

ERRCNTi 

LSTERRi 



(PROGRAM VARIABLES 
, ................. 



STRTSWi 

STATI 

CLKXl 

MASKXI 

TEMPI I 

TEMP2t 

TEHP3I 

TEMP4I 

TEMPS ( 

SAVROl 

SAVRK 

SAVR2I 

SAVR31 

5AVR4( 

SAVR5I 

SAVSPl 

SAVPCl 

ZERO! 

ONE! 

HEMLIMi 



DMACTVt ,BLKW 1 
DMNUM( ,BLKW 1 
SAVACTi ,BLKW 1 
SAVNUMi ,BLKW t 
RUN I 
.EVEN 
CPEAMi 
MILKl 



DM,MAP-6 
CNT,MAP-4 



(TELETYPE KEYBOARD CONTROL REGISTER 
(TELETYPE KEYBOARD DATA BUFFER 
(TELEPRINTER CONTROL REGISTER 
» TELEPRINTER DATA BUFFER 



(SCOPE ADDRESS FOR LOOP ON TEST 

(ADDRESS OF NEXT TEST TO BE EXECUTED 

tADDRESS for lock ON CURRENT DATA 

(NUMBER OF ITERATIONS THAT CURRENT TEST WILL BE 

(NUMBER OF ITEREATI0N5 COMPLETED 

» NUMBER OF TEST IN PROGRESS 

(NUMBER OF PASSES COMPLETED 

(TOTAL NUMBER OF ERRORS 

(PC OF LAST ERROR CALL 



(SWITCHES AT START OF PROGRAM 
(DM STATUS WORD STORAGE 



(TEMPORARY STORAGE 
(TEMPORARY STORAGE 
(TEMPORARY STORAGE 
(TEMPORARY STORAGE 
(TEMPORARY STORAGE 
(RO STORAGE 
(Rl STORAGE 
(R2 STORAGE 
(R3 STORAGE 
(P4 STORAGE 
(R5 STORAGE 

(STACK POINTER STORAGE 
(PROGRAM COUNTER STORAGE 



(HIGHEST LOCATION FOR NPR'S 
(DHCll'S SELECTED ACTIVE, 
(OCTAL NUMBER OF DMCll'S, 
tORIGINAL ACTV DEVICES 
(WORKABLE NUMBER 
(POINTER TO RUNNING DEVICE, 

iTABLE POINTER, 
(TABLE POINTER 
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PROGRAV PARAMETtPS, VAPIAHLES, Af.D TRAP CALLS, 



197 
194 

19^ 

201 

20 2 
203 

2g4 
705 
?<»6 

208 
2ng 
210 

21 1 
212 



001124 
001 327 



000 
000 



;PHOGRAM CONTPOL FLAGS 



. ............. 

INIFLG: ,ByTE 

EPrtftjGi .BYTE 

LGKFLG! .BYTE 

QV.FLGj .BYTE 

.EVEN 



f PROGRAM INITIALISATION FLAG 
jERPOR OCCURED FLAG 
iLuCK QN CuRREriT TEST FLAG 
jOUICK VERIFY FLAG. 

)0N FIRST PASS OF EACH DHCl 1 ITERATIONS WILL BE 



jDEFINITIONS FOR TRAP SUBROUTINE CALLS 

^POINTERS TO SUBROUTINES CAM BE FOUND 

I IN THE TABLE IMMEDIATLY FOLLOWING THE DEFINITIONS 



213 
214 


001330 




.TRPTABj 








215 


104400 


SCOPEaTRAP+0 


J CALL 


TO 


SCOPE LOOP AND ITERATION HANDLER 


2 1 b 


001 330 


003576 










217 




104401 


SCdPl-TRAP+l 


(CALL 


TO 


LOOP ON CURRENT DATA HANDLER 


218 


001332 


003736 


.SCOPl 








219 




104402 


TYPE«TRAP+2 


;CALL 


TO 


TELETYPE OUTPUT ROUTINE 


220 


OOl 334 


003766 


,TYPE 








221 




104403 


INSTRbTRAP+3 


;CALL 


TO 


ASCII STRIMG INPUT ROUTINE 


222 


OOU36 


004050 


.INSTR 








223 




104404 


INSTEP»TRAP+4 


;CALL 


TO 


INPUT ERROR HANDLER 


224 


001 340 


004154 


.INSTER 








235 




104405 


FARAM«TPAP+5 


J CALL 


TO 


NUMERICAL DATA INPUT ROUTINE 


226 


001342 


004174 


.PARAM 








227 




104406 


5AV05«TRAP+6 


jCALL 


TO 


REGISTER SAVE ROUTINE 


22R 


001344 


O04374 


,SAV05 








229 




104407 


RE505eTRAP*7 


jCALL 


TO 


REGISTER RESTORE ROUTINE 


230 


001146 


004434 


,RES05 








231 




104410 


CONVRTaTRAP+10 


;CALL 


TO 


DATA OUTPUT ROUTINE 


232 


001350 


004466 


.CONVPT 








233 




104411 


CNVRTsTRAP+U 


jCALL 


TO 


DATA OUTPUT ROUNTINE WITHOUT CR/LF 


234 


001 3S2 


004472 


.CNVRT 








235 




104412 


MSTCLR»TRAP+12 


jCALL 


TO 


ISUE A MASTER CLEAR 


21<> 


O'jt 354 


005466 


.MSTCLR 








237 




104413 


DELAY«TRAP+13 


J CALL 


TO 


DELAY 


738 


001356 


005436 


.DELAY 








239 




104414 


ROMCLKsTRAP+14 


jCALL 


TO 


CLOCK ROM ONCE 


240 


OOl 3b0 


no5504 


.ROHCLK 








241 




104415 


DATACLK«TRAP+15 


KALL 


TO 


CLK DATA 


242 


001362 


005552 


.DATACLK 









243 
244 
245 



104416 
001364 005616 



TIMERsTRAP-fie 
.TIMER 



jCALL TO DELAY A CLOCK TICK 



246 
247 
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PROGRAM PARAMETERS, VARIABLES, AND TRAP CALLS, 
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248 






jDMCll CONTROL 


249 








750 








251 


001366 


OOOOOO 


STATU 


252 


001 370 


000000 


STAT2I 


253 


001372 


OOOOOO 


STAT3I 


254 








255 






»DMC11 VECTOR 


256 








257 








258 


001 374 


OOOOOO 


DMRVECl 


259 


001376 


OOOOOO 


DKRLVLI 


260 


001400 


OOOOOO 


DMTVECt 


261 


001402 


OOOOOO 


DMTLVLl 


262 


001404 


OOOOOO 


DHCSRI 


263 


001406 


OOOOOO 


DKCSRHl 


264 


001410 


OOOOOO 


DMCTLl 


265 


001412 


OOOOOO 


DMP04I 


266 


001414 


OOOOOO 


DMP06I 


267 






269 






fTEMP STORAGE 


269 






270 








271 


001416 


OOOOOO 


TEMPI 


272 




001460 


.«.+40 


275 








274 






fDMCit STATUS 


275 








276 






277 




001500 


,«1500 


279 


001500 




DM, MAPI 


279 


001500 


oooooi 


DMCROOl .BLKW 


290 


001502 


000001 


DHSlOOl .BLKW 


281 


001504 


oooooi 


DMS200t .BLKW 


262 


001506 


000001 


DM53001 ,BLKH 


283 








284 


001510 


oooooi 


DMCROlt .BLKH 


2fi5 


001512 


OOOOOI 


DMSlOli .BLKW 


286 


001514 


oooooi 


DMS201I .BLKW 


287 

2HS 


001516 


OOOOOI 


DMSSOlt .BLKW 


2R9 


001520 


OOOOOI 


DHCR02t .BLKH 


290 


001522 


OOOOOI 


DMS102I .BLKW 


291 


001524 


OOOOOI 


DMS202I .BLKW 


292 
793 


001526 


OOOOOI 


DMS302I .BLKW 


294 


001530 


OOOOOI 


DHCR03I .BLKW 


295 


001532 


OOOOOI 


DMSi03l .BLKW 


296 


001534 


OOOOOI 


DMS203I .BLKW 


297 
298 


001536 


OOOOOI 


DMS303I .BLKW 


299 


001540 


OOOOOI 


DMCR04I ,BLKW 


300 


001542 


OOOOOI 


DMS104I .BLKW 


301 


001544 


OOOOOI 


DMS2041 .BLKW 


302 


001546 


OOOOOI 


DHS3041 .BLKH 


303 









; POINTER TO DHCll RECEIVER INTERRUPT VECTOR 

I POINTER TO DHCll RECEIVER INTERRUPT SERVICE PS 

JPOINTER TO DMCll TRANSMITTER INTERRUPT VECTOR 

T POINTER TO DMCll TRANSMITTER INTERRUPT SERVICE PS 

} POINTER TO DMCn CONTROL STATUS REGISTtR 

JPOINTER TO DHCll CONTROL STATUS REGISTER HIGH BYTE, 

J POINTER TO DHCll CONTOL OUT REGISTER 

^POINTER TO DMCll PORT REGISTERCSEL 43 

jPOINTER TO DMCll PORT REGISTERCSEL 63 



fCONTROL STATUS REGISTER FOR DMCll NUMBER 00 
J VECTOR FOR DMCll NUMBER 00 
fDDCHP LINE# FOR DMCll NUMBER 00 
J 3RD STATUS WORD 

ICONTROL STATUS REGISTER FOR DMCll NUMBER 01 
fVECTOR FOR DMCll NUMBER 01 
fODCMP LXNEl FOR DHCll NUMBER 01 
1 3RD STATUS WORD 

ICONTROL STATUS REGISTER FOR DMCll NUMBER 02 
I VECTOR FOR DMCll NUMBER 02 
fDOCHP LINE# FOR DMCll NUMBER 02 
;3RD STATUS WORD 

f CONTROL STATUS REGISTER FOR DMCll NUMBER 03 
f VECTOR FOR DMCll NUMBER 03 
tDDCHP LINE! FOR DMCll NUMBER 03 
I 3RD STATUS WORD 

fCONTROL STATUS REGISTER FOR DHCll NUMBER 04 
f VECTOR FOR DMCll NUMBER 04 
fDDCNP LINE! FOR DMCll NUMBER 04. 
;3RD STATUS WORD 
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304 




uOOOOl 


DMCR05 ; 






001552 


OOOOOl 


D*''S105» 


,BLKW 


30b 


001554 


UOOOOl 


D'^S205J 




307 


001556 


OOOOOl 


DMS305I 


,RLKW 


30^ 


001560 


OOOOOl 


D^'CR06l 


,BLKW 


310 


0O1562 


OOOOOl 


I5MS106I 


iBLKw 


31 1 


001564 


OOOOOl 


DMS206 1 


,BLKW 


312 


001566 


UOOOOl 


DMS306 t 


iBLKW 


31 3 
314 


001570 


OOOOOl 


DMCR07 t 


• BLKW 


31 S 


001572 


OOOOOl 


DMS107 t 




3U 


001574 


OOOOOl 


DMS207 1 


,BLKW 


317 


001576 


OOOOOl 


DMS307J 


|BLKW 


31P 










3l<> 


001600 


OOOOOl 


DMCRIO t 


»BIjKW 


320 


001602 


OOOOOl 


DMSl i 1 


«5LKW 


321 


001604 


OOOOOl 


Ot^S2lO t 




322 


001 606 


OOOOOl 


D^'S310l 


, BLKW 


3?3 










324 


001610 


OOOOOl 


DMCRl 1 1 


,BLKW 


32? 


001612 


OOOOOl 


DMSl 111 


.BtiKW 


326 


001 614 


OOOOOl 


DM5211 1 


»BLKW 


327 


001616 


OOOOOl 


DMS31 1 t 


(BLKW 


328 










329 


00] 620 


OOOOOl 


DMCR12 J 


,BLKW 


3 30 


001623 


OOOOOl 


DMSl 12t 


,BLKW 


331 


001624 


OOOOOl 


DHS212I 


*BLKM 


332 


001626 


onoool 


DMS312I 


,BLKW 


333 










334 


001630 


OOOOOl 


DMCR13I 


tBLKW 


335 


001632 


OOOOOl 


DMS113I 


.BLKW . 


336 


001 634 


OOOOOl 


DMS213I 


(BLKW 


337 


001636 


OOOOOl 


DMS313I 


(BLKW 


338 










339 


001640 


OOOOOl 


DMCBi4| 


(BLKW 


340 


001642 


OOOOOl 


DMSn4| 


(BLKW 


341 


001644 


OOOOOl 


DMS214| 


(BLKW 


3 42 


0O1 646 


OOOOOl 


DMS314I 


(BLKW 


343 










344 


001650 


OOOOOl 


DMCRlSt 


(BLKW 


345 


001652 


OOOOOl 




(BLKW 


346 


001654 


OOOOOl 


[]MS215t 


(BLKW 


347 


001656 


OOOOOl 


DH5315t 


(BLKW 


34i3 










349 


001660 


OOOOOl 


DMCR16I 


(BLKW 


350 


001662 


OOOOOl 


DMS116I 


(BLKW 


351 


001 664 


OOOOOl 


DMS216I 


(BLKW 


352 


001666 


oooooi 


DMS316I 


(BLKW 


35 3 










354 


001670 


OOOOOl 


DMCR171 


.BLKW 


355 


0f>l672 


OOOOOl 


DMSU7I 


(BLKW 


356 


00167 4 


OOOOOl 


DM52171 


(BLKW 


357 


00lft76 


OOOOOl 


DMS317I 


.BLKW 


35^1 










359 


001700 


OOOOOO 


DM.CHDl 


OOOOOO 



sCO'^fTROL STATUS REGISTER FUR DMC 1 1 NUMBER 05 
jVfcClGR FOR DKli i^UMBER 05 
jDDCMp LINEt FOR D?KU NUf^BER Ob 
;3KD STATUS l^ORD 

^CONTROL STATUS REGISTER FOR DMCll NUMBER 06 
(VECTOR FOR DMCll NUMBER Ob 
:DDCMP LINE! FOR DMCll NUMBER 06 
j3HD STATUS WORD 

JCONTROL STATUS REGISTER FOR DMCll NUMBER 07 
iVECTOR FOR D^?C11 NUMBER 07 
»L)DCMp LINE* FOR DMCll NUMBER 07 
»3RD STATUS WORD 

rCQNTPOL STATUS REGISTER FDR DMCU NUMBER 10 
;VE:CT0P for DMCU NUMBER 10 
iDOCMP LINE» FOR DMCll NUMBER 10 
J 3RD STATUS WORD 

ICONTROL STATUS REGISTER FOR DMCll NUMBER 11 
(VECTOR FOR DMCU rtUHBER li 
IDDCMP LINE# FOR DMCll NUMBER 11 
J 3RD STATUS WORD 

ICONTROL STATUS REGISTER FOR DMCll NUMBER 12 
(VECTOR FOR DMCll NUMBER 12 
(DDCMp LINE* FOR DMCll NUMBER U 
J 3RD STATUS WORD 

ICONTROL STATUS REGISTER FOR DMCll NUMBER 13 
(VECTOR FOP DMCll NUMBER 13 
jDDCMp LINE! FOR DMCll NUMBER 13 
1 3RD STATUS WORD 

(CONTROL STATUS REGISTER FDR DMCll NUMBER H 
(VECTOR FOR DMCll NUMBER 14 
(DDCMP LINEI FOR DMCU NUMBER 14 
(3RD STATUS WORD 

(CONTROL STATUS REGISTER FOR DMCll NUMBER 15 
(VECTOR FOR DMCll NUMBER 15 
(DDCMP LINEi FOR DMCll NUMBER 16 
(3RD STATUS WORD 

(CONTROL STATUS REGISTER FOR DMCli NUMBER 16 

(VECTOR FOR DMCU NUMBER 16 
(DDCMP LINE* FOR DMCU NUMBER 16 
;3RD STATUS WORD 

(CONTROL STATUS REGISTER FOP DMCU NUMBER 17 
(VECTOR FOR DMCU NUMBER 17 
(DDCMP LINEI FOR DMCll NUMBER 17 
(3RD STATUS WORD 
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DZDME, 


'1 1 12 


-MAY-77 14118 


PPOGHA'^ PARAMETERS 


360 










361 






(DMCU 


PAS 


362 










363 










364 


001702 




CNT.MAPl 


365 


001702 


OOOOOO 


PACTOOl 





366 


001704 


OOOOOO 


ERCTOOI 





367 










368 


001706 


OOOOOO 


PACTOll 





369 


001710 


OOOOOO 


ERCTOn 





370 










371 


001712 


OOOOOO 


PACT02I 





372 


00171 4 


OOOOOO 


ERCT021 





373 










374 


001716 


OOOOOO 


PACT03I 





i f 3 




uoOGOD 






376 










377 


001722 


OOOOOO 


PACT04I 





379 


001724 


OOOf^OO 


ERCT04I 





379 










390 


001726 


OOOOOO 


PACTOSi 





381 


001730 


OOOOOO 


ERCT05I 





3tt2 










393 


001732 


OOOOOO 


PACT06I 





394 


001734 


OOOOOO 


ERCT061 





3R5 










386 


001736 


OOOOOO 


PACT07I 





387 


001740 


OOOOOO 


ERCT071 


, 


389 










389 


001742 


OOOOOO 


PACTlOl 





390 


001744 


OOOOOO 


ERCTlOl 





391 










392 


001746 


OOOOOO 


PACTUl 





393 


001750 


OOOOOO 


ERCTUI 





394 










395 


001752 


OOOOOO 


PACT121 





396 


001754 


OOOOOO 


ERCT12 





397 










398 


001756 


OOOOOO 


PACT131 





399 


001760 


OOOOOO 


ERCTU 





400 










401 


001762 


OOOOOO 


PACTM 





402 


001764 


OOOOOO 


ERCT14I 





403 










404 


001766 


OOOOOO 


PACT15 





405 


001770 


OOOOOO 


ERCT15 





406 










407 


001772 


OOOOOO 


PACT16I 





408 


001774 


OOOOOO 


ERCTlSl 





409 










410 


001776 


OOOOOO 


PACT17 





411 


002000 


OOOOOO 


ERCT17 





di 3 











AND ERROR COUNT TABLE 



(PASS COUNT FOR DMCU 
(ERROR COUNT FOR DMCl 

(PASS COUNT FOR DMCU 
(ERROR COUNT FOR DHCl 

(PASS COUNT FOR DMCU 
(ERROR COUNT FOR DMCl 

(PASS COUNT FOR DMCU 

J -KHcr. c"-'=T ror dmcii 

(PASS COUNT FOR DMCU 
(ERROR COUNT FOR DMCl 

(PASS COUNT FOR DMCU 
(ERROR COUNT FOR DMCl 

(PASS COUNT FOR DMCU 
(ERROR COUNT FOR DMCl 

(PASS COUNT FOR DMCU 
(ERROR COUNT FOR DHCl 

(PASS COUNT FOR DMCU 
(ERROR COUNT FOR DMCl 

(PASS COUNT FOR DMCU 
(ERROR COUNT FOR DMCl 

(PASS COUNT FOR DMCU 
(ERROR COUNT FOP DMCl 

(PASS COUNT FOR DMCU 
(ERROR COUNT FOR DMCl 

(PASS COUNT FOR DMCU 
(ERROR COUNT FOR DHCl 

(PASS COUNT FOR DMCU 
(ERROR COUNT FOR DMCl 

(PASS COUNT FDR DMCU 
(ERROR COUNT FOR DMCl 

(PASS COUNT FOR DMCU 
(ERROR COUNT FDR DMCl 



NUMBER 00 
1 NUMBER 00 



NUMBER 01 
1 NUMBER 01 



NUMBER 02 
1 NUMBER 02 



NUMBER 03 



NUMBER 04 
i NUMBER 04 



NUMBER 05 
1 NUMBER 05 



NUMBER 06 
1 NUMBER 06 



NUMBER 07 
I NUMBER 07 



NUMBER 10 
1 NUMBER 10 



NUMBER U 
1 NUMBER U 



NUMBER 12 
1 NUMBER 12 



NUMBER 13 
1 NUMBER 13 



NUMBER 14 
1 NUMBER 14 



NUMBER 15 
1 NUMBER 15 



NUMBER 16 
1 NUMBER 16 



NUMBER 17 
1 NUMBER 17 



DZD"^? MfCyll 30ri046) ll-JUL-77 Ui40 PAGE 10 

DZDVfc.Pll l2-M&y-77 una PRQGPA^'. PARAMETERS, VARIABLES, a^D TPAP CALLS, 



PAGEi 0029 



FORMAT OF STATUS TABLE 



15 14 13 12 U in 09 OB 07 G6 05 04 03 02 01 00 



IIIIIXIIIIIIIIIIX 
ICONXROL REGISTERI CSB 

IIIIIIIIIIIIIIIII 



1 I IIIIIIIIIIIII II 

« V E C T Q R #1 STATl 
IIIIIIIIIIIIIIIII 



IIIIIIIIIIIIIIIII 
IttBM ADO#I«LINE #«I STAT2 

IIIIIIIIIIIIIIIII 



I 


I 


1 


I 


I 


I 


I 


I 


I 


I 


I 


I 


I 


I 


I 


I 


I 




I 


I 


I 


I 


I 


I 


I 


I 


I 


I 


I 


I 


I 


I 


I 


# 1 ♦ 


I 


STAT3 


I 


I 


I 


I 


I 


I 


I 


I 


I 


I 


I 


I 


I 


I 


I 


I 


I 





DEFINITION OF FORMAT 



CSRi CONTAINS DHCU CSR ADDRESS 



STATU BITS 00-00 IS DHCll VECTOR ADDRESS 
BITlSal MICRO-PROCESSOR HAS CRAM 
BITlSsO HICRO-PROCESSOR HAS CROM 
BITt4»l 77?? TURNAROUND CONNECTOR IS ON 
BIT14»0 NO TURNAROUND CONNECTOR 
BTTJ3S0 LINE UNIT IS AN M8201 
BIT13al LINE UNIT IS AN M8202 
BIT12«1 NO LINE UNIT 

BITS 09-11 IS DMCll BR PRIORITY LEVEL 

STAT2I LOM BYTE IS SWITCH PACIl CDUCMP LINE NUMBER) 

HIGH BYTE IS SWITCH PAC*2 (BM873 BOOT ADD) 

STAT3! BIT0»1 DO FREE RUNNING TESTS ON KMC 

(MUST BE SET TO A ONE maNuALLx iPRGGRAn DSDMX 0NLY3) 
KMC MUST HAVE MICRO-CODE WRITTEV FROM RUNNIMG 
DZDMG TEST 2 FIRST 

BITlsl DMCU*AL LOCAL HIGH SPEED MICRO-CODE 
BIT1*0 DMCll»AR REMOTE LOW SPEED MICRO-CODE 



MACYli 30C1046) li-JUL-77 



DZDME.Pll 12 


•MAY-77 


14118 




468 










469 










470 










471 










A72 










473 










47 4 










475 










476 


002002 


012737 


000340 


177776 


477 


002010 


012706 


001200 




479 


002014 


012737 


005336 


000024 


479 


002022 


013737 


001310 


001314 


480 


002030 


005037 


010016 




481 


002034 


105037 


001325 




482 


002040 


105037 


001327 




4g3 


002044 


012737 


001470 


001320 


484 


002052 


012737 


001676 


001323 


485 


002060 


012737 


100000 


001316 


486 


002066 


012700 


001702 




487 


On?o72 


005020 






489 


O02074 


022700 


002002 




489 


002100 


001374 






490 


002102 


005037 


001234 




491 


002106 


012737 


000001 


001226 


492 


002114 


012737 


002002 


001214 


49 i 










494 


002122 


013746 


000006 




495 


002126 


013746 


000004 




496 


002132 


012737 


002166 


000004 


497 


002140 


012737 


177570 


001202 


498 


002146 


012737 


177570 


001200 


499 


002154 


022777 


177777 


177020 


500 


002162 


001402 






501 


002164 


000407 






SOii 


002166 


022626 






503 


002170 


012737 


000176 


001203 


504 


002176 


012737 


000174 


001200 


505 


002204 


012637 


000004 




506 


002210 


012637 


000006 




507 


002214 


105737 


001324 














509 


002222 


022737 


003522 


000042 


510 


002230 


001402 






511 


002232 


104402 


001000 




512 


002236 


004737 


007606 




513 


002242 


017737 


176734 


001236 


514 


002250 


005737 


000042 




515 


002254 


001402 






516 


002256 


005037 


001236 




517 


002262 


032737 


000001 


001236 


518 


002270 


001012 






519 


002272 


105737 


001236 




520 


002276 


100007 






521 


002300 


005737 


001306 




522 


002304 


001006 






523 


002306 


104402 


0071S4 
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I PROGRAM INITIALIZATION 

J LOCK OUT INTERRUPTS 

fSET UP PROCESSOR STACK 

I SET UP POWER FAIL VECTOR 

KLEAR PROGRAM CONTROL FLAGS AND COUNTS 

I TYPE TITLE MESSAGE 



. START 1 


MOV 


#340, PS 


rLOCK OUT INTERRUPTS 




MOV 


« STACK fSP 


FSET up STACK 




HGV 


9 tPrAIL, v*24 


• SET -UP POWER FAIL VECTOR 




MOV 


DMNUM,SAVNUM 


rSAVE NUMBER OF DEVICES IN SYSTEM, 




CLR 


5NFLG 


pCLEAR SOFT TYPEOUT FLAG 




CLRB 


ERRFLG 


CLEAR ERROR FLAG 




CLRB 


QV.FLG 


fZERO QUICK VERIFY FLAG 




MOV 


|DM,MAP-t0, CREAM 


(GET MAP POINTER, 




MOV 


#CNT,HAP-4,MILK 


fGET pass COUNT MAP POINTER 




MOV 


IBIT15#RUN 


rPOiNT POINTER TO FIRST DEVICE, 




MOV 


»CNT,MAP,RO 


PASS COUNT POINTER TO RO 


23$l 


CLR 


£P0) + 


fCLear table 




CMP 


»CNT,MAP-^100f RO 


DONE YET? 




BNE 


23$ 


fkeep going 




CLR 


LSTERR 


rCLEAR LAST ERROR POINTER 




MOV 


ll,TSTNO 


set up for test 1 




MOV 


I.STARTrRETURN 


,SET UP FOR POWER FAIL BEFORE 








TESTING STARTS 




MOV 


ei6»-tSP) 


jSAVE CURRENT VECTORS 




MOV 


9#4,-CSP) 






MOV 


f6|,9ff4 


SET- UP FOR TIMEOUT 




MOV 


#177570fSWR 


fSET SWR TO HARD SWR ADDRESS 




MOV 


#177570, DISPLAY 


rSET DISPLAY TO HARD SWR ADDRESS 




CMp 


*-lf 9SWR 


1 REFERENCE HARDWARE SWITCH REGISTER 




6EQ 


6«+2 


FIF B -1 USE SOFT SWR ANYWAY 




BR 


7$ 


IF IT EXISTS AND NOT ■ -1 USE HARD SWR 


6$i 


CMP 


CSP)tfCSP)f 


•ADJUST STACK 




MOV 


ISHREGrSWR 


f POINTER TO SOFT SWR 




MOV 


*DISPREG, DISPLAY 


(POINTER TO SOFT DISPLAY REG 


7$l 


MOV 


CSP)f,9«4 


J RESTORE VECTORS 




MOV 


CSP)+,9i6 






TSTB 


INZFLG 


HAS INITIALIZATION BEEN PERFORMED 




BNE 


2QS 


(BR IF YES 




CMP 


|$ENDAD#9ff42 


»IF ACT-ii AuiSkAxIC i^DDSr DON'T TY?E 11 




BEq 


208 






TYPE 


rMTITLE 


TYPE TITLE MESSAGE 


20«( 


JSR 


PCCKSWR 


'CHECK FOR SOFT SWR 




MOV 


eSWRfSTPTSW 


fSTORE STARTING SWITCHES 




TST 


»«42 


lis IT RUNNING IN AUTO MODE? 




BEQ 


.♦6 


FBR IF NO 




CliR 


STRTSH 


FiF YESf CLEAR SWITCHES 




BIT 


«SW00,5TRTSW 


rIF SWOOslf QUESTIONS ARE ASKED, 




BNE 


17$ 


BR IF SWOOal 




TSTB 


STRTSM 


FBIT7«1?7 




BPL 


171 


BR IF 5W07«0 




TST 


DMACTV 


FARE ANY DEVICES SELECTED? 




BNE 


16t 


fBR if YES 




TYPE, 


NOACT 


FNO DEVICES SELECTED, 
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5 2 4 


2 


000000 




HALT 




ISTOP THE SHD^ 


5 25 


002^14 


0007 76 




BP 


.-2 


tUISQUALIFY CDNTINUfc SWITCH 


576 


002316 


004737 


010512 


17SI JSB 


PC, AUTO, size; 


jGO DO THE AUTO SIZE 


527 


(102 322 


1057 37 


001324 


16$| TSTB 


IMFLG 


IFIRST TIME? 


529 


002 326 


001410 




BF.Q 


21S 


jBP IV YES 


5 ?9 


002330 


1 05737 


001236 


TSTB 


STPTSW 


?IF USING SAME PARAMETERS DONT TYPE MAP 


530 


002334 


10043! 




BHl 


1$ 




5 31 


002336 


032737 


000006 001236 


BIT 


iBITl IBIT2,STRT5W| IS TEST NO, OR LOCK SELECTED 


5 32 


002 3 44 


001 403 




BEO 


24S 


;1F NO THEN TYPE STATUS 


533 


02346 


000424 




BR 


IS 


;IF YES DO NOT TYPE STATUS 


534 


002 350 


0051 37 


001 324 


21 $t COM 


INIFLG 


?SET FLAG 


5 35 


002354 


1 04402 


006224 


24$l TYPE 


,XHEAD 


J TYPE HEADER 


536 


002360 


012704 


001500 


MOV 


|DM.MAP,R4 


ISET POINTER 


537 


002364 


010437 


001246 


581 MOV 


R4, TEMPI 


;S£T ADDRESS 


538 


002370 


012437 


001250 


^»ov 


CR4)+,TEMP2 


|SET CSR 


539 


002374 


00141 1 




6EQ 


1$ 


J ALL DONE IF ZERO 


540 


002376 


012437 


001252 


MOV 


tP4)+rTEMP3 


J SET STATl 


541 


002402 


012437 


001254 


MOV 


{R4)+,TEMP4 


;SET STAT2 


542 


002406 


012437 


001256 


MOV 


CR4)+, TEMPS 


?SET STAT3 


543 


002412 


1 04410 




CONVRT 


jTYPE OUT STATUS MAP 


5 44 


OO24I 4 


007454 




XSTATQ 


1 


545 


002 41 6 


000762 




BR 


5» 




5 46 


002420 


012700 


001500 


151 MOV 


#DH,MAP,RO 


|R0 POINTS TO STATUS TABLE 


547 
546 










549 








n«AUTO SIZE 


TEST 




550 








n«THIS TEST 


VERIFYS THAT THE 


DMCliS AND/OR KMCllS ARE AT THE CORRECT FLOATING 


551 








n^ADDPESSES 


FOP YOUR SYSTEM, 


IF THIS TEST FAILS, IT IS NOT A HARDtdARE ERROR, 


552 








n*CHECK THE 


ADDRESSES OF ALL 


FLOATING DEVICES (DJ, DH, DQ» DU, DUP, LK, DHC # DZ, KMC ) 


553 








»i*IF THERE 


ARE NO OTHER FLOATING DEVICES BEFORE THE DMCUf THE FIRST 


554 








n*I>MCli ADDRESS IS 760070, KMCll IS 760110. NO DEVICE SHOULD EVER BE AT 


555 








n»ADDRE5S 760000, THIS TEST 


MAY REQUIRE 2 OR MORE ATTEMPTS TO GET THE 


556 








n«RlGHT ADDRESSES. AFTER YOU 


HAVE CHANGED THE' ADDRESS TO WHAT IT TOLD 


557 








n»YOU THE FIRST TIME, IT HAY 


COME BACK AND TELL YOU A DIFFERENT ADDRESS 


55 B 








n#THE NEXT 


TIME YOU RUN IT, 


PLEASE HAVE PATIENCE, THE FINAL ADDRESS 


559 








it»WILL BE CORRECT (AS LONG AS ALL DEVICES IN FRONT OF THE DMC'S ARE 


560 








n ♦CORRECT), 






56 1 








) f ««#*#«««#«»««*««««*«***##•*«*#«*«»«#*»**#««»»**«»**«*»*•***»«««#**«* 


562 
563 


002424 


013746 


000004 


HOV 


»«4,-CSP) 


ISAVE LOC 4 


564 


002430 


013746 


000006 


HOV 


•#6,-CSP) 


»SAVE LOC 6 


565 


002434 


005037 


000006 


CLR 


916 


ICLEAR VEC42 


566 


002440 


005037 


001252 


CLR 


TEMP3 


KLEAR FLAG 


567 


002444 


005005 




CLR 


R5 


;P5»0»DMC, P5s-1»KMC 


568 


002446 


011037 


001404 


AUSTRTI MOV 


CROJ,DMCSR 


J GET NEXT DMC CSR 


569 


0O2452 


001564 




BEO 


AUDONE 


jBR IF DONE 



570 


002454 


005705 








TST 


R5 




J DMC OR KMC? 


571 


002456 


001005 








BNE 


1« 




»BR IF KMC 


572 


002460 


032760 


100000 


000002 




BIT 


iBITlS 


2(R0) 


jCHECK FOR DMC CSR 


573 


002466 


001061 








BNE 


SKIP 




TSKIP IF NOT DMC 


574 


002470 


000404 








BR 


28 




»1TS A DMC 50 CONTINUE 


575 


0n2472 


032760 


100000 


000002 


l$t 


BIT 


»BIT15 


2(R0) 


(CHECK FOR KMC CSR 


576 


002500 


00145 4 








BEQ 


SKIP 




(SKIP IF NOT KMC 


577 


002502 


0127 37 


002674 


000004 


2$l 


HOV 


#NODEV 


914 


JSET UP FOR TIMEOUT 


578 


002510 


005705 








TST 


R5 




»OMC OR KMC? 


579 


002512 


001003 








BNE 


38 




|BR IF KMC 
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MACYll 


30(1046) 
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PAGE 


DZDME, 


PI 1 12 


-HAY-77 


14I1S 


PROGRAM 


INITIALIZATION 


AND START UP, 




580 


002514 


012703 


000006 






MOV 


«6,R3 


TR3 IS COUNT OF DEVICES BEFORE DMC 


591 


0U2520 


OO0402 








BR 


48 


|GD ON 


5rt2 


002522 


012703 


000010 




3tt 


MOV 


#10, R3 


TR3 is count of DEVICES BEFORE KMC 


583 


002526 


012702 


003010 




4«| 


HOV 


|0EVTAB,R2 


(R2 IS DEVICE TABLE PONTER 


584 


0^2532 


012701 


160010 






HOV 


1160010, Rt 


(START WITH ADDRESS 160010 


5B5 


002536 


005711 






FLOATi 


TST 


tPl) 


(CHECK ADDRESS IN Rl 


?86 


002540 


111204 








MOVB 


CR2),P4 


(IF NO TIMEOUT, GET NEXT ADDRKSS 


587 


002542 


060401 








ADD 


R4#R1 


(IN Rl 


598 


002544 


005201 








INC 


PI 




599 


002546 


040401 








BIC 


P4,R1 




590 


002550 


005703 








TST 


R3 


(ANY MORE DEVICES TO CHECK FOR? 


591 


002552 


001371 








BNE 


FLOAT 


(BR IF YES 


592 


007554 


012737 


002700 


000004 




MOV 


»ERR,9I4 


(OK ONLY DHC'S ARE LEFT, SET UP FOR TIMEOUT 


593 


002562 


C10137 


003022 






MOV 


Rl#XLOC 


(SAVE FIRST DMC/KHC ADDRESS 


5 5 ■» 




^05705 






fYi 


TST 


?! 


r^Mf OR KMC? 


595 


002570 


001005 








BNE 


18 


(BR IF KMC 


596 


002572 


032760 


100000 


000002 




BIT 


#BITl5f 2CR0} 


(CHECK FOR DMC CSR 


597 


002600 


001014 








BNE 


SKIP 


(SKIP IF NOT DMC 


598 


002602 


000404 








BR 


28 


(ITS A DMC SO CONTINUE 


599 


002604 


032760 


100000 


000002 


lit 


BIT 


|6IT15,2(R0} 


(CHECK FOR KMC CSR 


600 


002612 


001407 








BEQ 


SKIP 


(SKIP IF NOT KMC 


601 


002614 


005711 






281 


TST 


CRU 


(CHECK DMC ADDRESS 


602 


002616 


020137 


001404 






CMp 


R1#DHCSR 


(DOES IT MATCH 


603 


002622 


001411 








BEQ 


OK 


(BR IF YES 


604 


002624 


062701 


000010 






ADD 


#10fRl 


(GET NEXT DMC ADDRESS 


605 


002630 


000756 








BR 


FY 


(DO IT AGAIN 


606 


002632 


062700 


000010 




SKXPi 


ADD 


»10»R0 


(SKIP TO NEXT CSR IN TABLE 


607 


002636 


011037 


001404 






MOV 


(R0},DKCSR 


(GET NEXT CSR 


608 


002642 


001470 








BEQ 


AUDONE 


(BR IF DONE 


609 


002644 


000750 








BR 


FY 


(ELSE CONTINUE 


610 


002646 


062700 


000010 




OKI 


ADD 


«10iR0 


(SKIP TO NEXT DMC CSR 


611 


002652 


062737 


000010 


003022 




ADD 


I10,XLOC 


(UPDATE EXPECTED DMC/KMC ADDRESS 


612 


002660 


011037 


001404 






MOV 


CRO)fDMCSR 


(GET NEXT DMC/KMC CSR 


613 


002664 


001457 








BEQ 


AUDONE 


(BR IF DONE 


614 


002666 


013701 


003022 






MOV 


XLOCRl 


(GET EXPECTED DMC/KMC ADDRESS 


615 


002672 


000735 








BR 


FY 


(CONTINUE 


616 


002674 


122243 






NODEVI 


CMpB 


CP2)+,-CR3) 


(ON TIMEOUT, INC R2f DEC R3 


617 


002676 


000002 








RTI 




(RETURN 


618 


002700 


005737 


001252 




ERRt 


TST 


TEMP3 


(CHECK FLAG IF « TYPE HEADER 


619 


002704 


001014 








BNE . 


18 


(SKIP HEADER 


620 


002706 


104402 








TYPE 




(TYPEOUT HEADER MESSAGE 


621 


002710 


007223 








CONERR 




(CONFIGURATION ERRORH M 


622 


'>02712 


012737 


002700 


001276 




MDV 


•ERR,SAVPC 


(SAVE PC FOR TYPEOUT 


623 


002720 


104411 








CNVRT 




(TYPE OUT ERROR PC 


624 


002722 


002770 








EHRPC 






625 


002724 


104402 








TYPE 




(TYPE REST OF HEADER 


676 


002726 


007277 








CNERR 






627 


002730 


012737 


177777 


001252 




MOV 


i-l,TEMP3 


(SET FLAG SO IT ONLY GETS TYPED O^CE 


628 


002736 


010137 


001262 




181 


MOV 


R1#SAVP1 


(SAVE Rl FOR TYPEOUT 


629 


002742 


104410 








CQNVRT 






630 


002744 


002776 








CONTAB 




(TYPE CSR VALUES 


631 


002746 


005705 








TST 


R5 


jDMC OR KMC 7 


632 


0O2750 


001003 








BNE 


3t 


(BR IF KMC 


633 


002752 


104402 








TYPE 




634 


002754 


007320 








DMCM 






635 


002756 


000402 








BR 


4$ 


jCQNTINUS 
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6 36 


O0276U 


1 04402 






637 


0^2762. 


007330 






638 


002764 


022626 






6 39 


002766 


<'r00727 






640 


002770 


UOOOOl 






641 


002772 


006 


002 




bi2 


002774 


001276 






643 


002776 


000002 






644 


003000 


006 


004 




645 


003002 


003U22 






646 


00 3004 


006 


002 




647 


O03oC6 


001404 






648 


n030) 


007 






649 


003011 


017 






650 


003012 


007 






65 1 


00301 3 


007 






652 


003014 


007 






653 


003015 


007 






654 


003016 


007 






655 


003017 


007 






656 


003020 


007 






657 




003022 






658 


003o22 


000000 






659 


003024 


005705 






660 


003026 


001005 






661 


003030 


012705 


177777 




662 


003o34 


012700 


001500 




663 


003040 


000602 






664 


003042 


012637 


000006 






00 3o46 


012637 


0OOQ04 




666 


003052 


032737 


000010 


001236 


667 


003060 


001422 






666 


003062 


1 04402 


006144 




669 


003066 


oosooo 






670 


00 3070 


000000 






67 1 


003072 


027737 


176104 


001312 


672 


003100 


101404 






673 


003102 


104402 


006005 




674 


00 3 106 


000000 






675 


00 3 1 1 


000776 






676 


003112 


Oi??3? 


176064 


001306 


677 


003l 20 


01 3700 


001306 




678 


3 1 2 4 


000000 






679 


003 1 26 


01 2700 


000300 




6B0 


003l32 


012701 


000302 




681 


003i36 


010120 






682 


003140 


005021 










022021 






684 


003144 


022700 


001000 






00 31 5 


001372 






6P6 










&B7 










688 










689 










690 


003152 








691 


003156 


137 46 
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692 


003162 


013746 


000004 




693 


003166 


005000 






694 


003170 


Ol 2737 


003234 


000004 


695 


003l76 


005037 


000006 




696 


003202 


005720 






697 


003204 


022700 


157776 




698 


003210 


001374 






699 


003212 


162700 


007776 




70C» 


003216 


010037 


001304 




' 701 


003222 


012637 


000004 




702 


003226 


012637 


000006 




703 


003232 


000413 






704 


003234 


022626 






70S 


003236 


162700 


000004 




706 


003242 


162700 


007776 




707 


003246 


022700 


030000 




708 


003252 


001361 






709 


003254 


012700 


037400 




710 


003260 


000756 




177776 


711 


003262 


012737 


000340 


712 


O03270 


032737 


000004 


001236 


713 


003276 


001411 






714 


003300 


104402 


006043 




715 


0G3304 


01273? 


0OQ240 


QQ3612 


716 


003312 


012737 


000240 


003614 


717 


003320 


000406 






718 


003322 


013737 


003730 


003612 


719 


003330 


013737 


003732 


00?614 


720 


003336 


012737 


010060 


001214 


721 


0033*4 


032737 


000002 


001236 


722 


003352 


001002 






723 


003354 


104402 


005755 




724 


003360 


000177 


175630 





3St 


TYPE 














4St 


CMP 




J ADJUST STACK 




BR 


OK 


;BP TO GET OUT 


EPPPCl 


1 








.BYTE 


6r2 






SAVPC 






CONTABi 


2 








.BYTE 


6,4 






XLOC 








.BYTE 


6,2 






DHC5P 






DEVTABi 


.BYTE 


7 


|DJ 




.BYTE 


17 


J OH 




.BYTE 


7 


}DQ 




.BYTE 


7 


|DU 




.BYTE 


7 


JDUP 




.BYTE 


7 


iLK 




.BYTE 


7 


IDHC 




.BYTE 


7 


JOZ 




.BYTE 


7 


|KMC 


,£VGN 








XLOCl 









AUDONEl 


T5T 


R5 


fDMC? 




BNE 


It 


)BR IF KMC AND ALt DONE 




MOV 


#-l#RS 


fSET R5 TO -1 CKHC) 




MOV 


IDM.MAPfRO 


f RESET RO TO START OF TABLE 




BP 


AUSTBT 


|G0 DO KMC'S 


Itl 


MOV 


CSP)+r0i6 


t RESTORE LOC 6 




MOV 


CSPHr9f4 


} RESTORE LOC 4 




BIT 


«SW03f STRTSw 


1 SELECT SPECIFIC DEVICES?? 




BEQ 


31 


rBH IF NO, 




TYPE 


fMNEW 


iTYPG THE MESSAGE. 




CLB 


RO 


fZERO DATA LIGHTS 




HALT 




fWAIT FOR USER TO TELL MHAT DEV] 




CMP 


9&HR,SAVACT 


jlS THE NUMBER VALID? 




BL05 


2$ 


J BR IF NUMBER IS OK. 




TYPE 


f MERR3 


fTELL USER OF INVALID NUMBER, 




HALT 




fSTOP EVERY THING. 




BR 


t-2 


^RESTART THE PROGRAM AGAIN. 


2tt 


HOV 


»SMR,DMACTV 


;GST NEW DEVICE PATTERN 




HOM 


D»ACtV,Ry 


jSiiaS THE USSR WHAT HE SELECTED ; 




HALT 




^CONTINUE DYNAHtlC SWITCHES. 


3tl 


HOV 


t300,R0 


» PREPARE TO CLEAR THE FLOATING 




MOV 


1302, Rl 


^VECTOR AREA. 300*776 


4SI 


MOV 


Rl#(R0)+ 


J START PUTTING "PC+2 • HALT" 




CLR 


tRi) + 


J IN VECTOR AREA, 




CMP 


CR0)+,£R1)+ 


IPOP POINTERS 




CHp 


llOOQfRO 


J ALL DONE?? 




SME 


4$ 


jBR IF NO. 


(TEST START AND 


RESTART 




.BEGINI 


MOV 


♦STACK, SP 


fSET UP STACK 




NOV 


»f6,"CSP} 


J SAVE LOC 6 



PAGEt 0034 



PROGRAM INITIALIZATION AND START UP. 





MOV 


»i4,-CSP) 


fSAVE LOC 4 




CLR 


RO 


1 START AT 




MOV 


«2$,9f4 


jSET UP FOR TIME OUT 




CLR 


»ie 


J TO AUTOSIZE MEMORY 


6$t 


TST 


CRO) + 


fCHECK ADDRESS IN f^O 


CMP 


1157776, RO 


lis IT AT LEAST 28K 




BNE 


6$ 


J BR IF NO 




SUB 


#7776, RO 


}SAVE 2K FOR MONITORS 


7SI 


NOV 


RO.MEMLIM 


1 STORE MEMORY LIMIT 


MOV 


(SP}+r»»4 


1 RESTORE LOC 4 




HOV 


CSP)*»9«6 


1 RESTORE LOC 6 




BR 


10$ 


ICQNTINUE 


2tt 


CHp 


CSP)+»CSP)+ 


1 ADJUST STACK 


SUB 


*4,R0 


fGET LAST GOOD ADDRESS 




SUB 


#7776, RO 


fSAVE 2K FOR MONITORS 




CMP 


130000, RO 


jIS IT 8K? 




BNE 


71 


fBR IF NO 




MOV 


#37400tR0 


|IF 8K DON'T SAVE 2K 




BR 


71 




lOSl 


MOV 


#340, PS 


'lock out INTERRUPTS 


BIT 


tBIT2,STRTSW 


(CHECK FOR LOCK ON TEST 




BEQ 


1» 


|BR IF NO LOCK DESIRED, 




TYPE 


,HLOCK 


fTYPC LOCK SELECTED. 




my 


#NOP,TTST 


tADJUST SCOPE ROUTINE. 




MOV 


|N0P,TTSf+2 


|SET UP TO LOCK 




BR 


3t 


{CONTINUE ALDNG, 


111 


HOV 


BRV!,TTST 


1 PREPARE NORMAL SCOPE ROUTINE 


MOV 


BRX,TTST42 


I LOCK NOT SELECTED, SET UP FOR NORMAL SCOPE 


3tl 


HOV 


#CKLE, RETURN 


1 START AT "CYCLE" FIND WHICH DEVICE TO TEST 


481 


BIT 


|SH01,S7R7St« 


lis TEST NO, SELECTED? 


BNE 


51 


}BR IF YES 




TYPE 


,HR 


ITYPE R 


Stl 


JMP 


•RETURN 


1 START TESTING 
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171 








7 ?P 
















7 10 








7 31 


On33b4 


f) 5 




732 


00 33 66 


(105037 


001234 


7 3 3 




J 05037 


001 325 


7 34 


00 3376 


005237 


001230 


7 35 


V U J ^ V * 


01 37 7 7 


001230 


7 36 


00 3410 


1 0440 2 


0O5733 


7 37 


00 3414 


1 u4402 


00607 2 


738 


003420 


1 0441 1 


003546 


7 39 


00 3424 


1 o4402 


006100 


7 40 


003430 


10441 1 


QO3554 


741 


00 3434 


1 04402 


QO6 1 06 


7 42 


003440 


10441 1 


003562 


7 43 


003444 


104402 


006 117 


74 4 


003450 


10441 1 


003570 


7 45 


00 3454 


013700 


00 1 322 


746 


00 3460 


013720 


001230 


747 


00 3464 


01 3720 


001232 


7 4g 


nni a7 

I.MJ J f V 


005337 


001314 


749 


003474 


001017 




750 


00 3 476 


1 1 27 37 


000377 


75 J 


00 350 4 


013737 


001 310 


75 2 


003512 


013701 


000042 


75 3 


Anle in 


001 406 




75 4 


00 35*0 


nn Aftfi5 

U 'J U »J V J 




755 


003s 2 2 






756 




004711 




757 


003524 


y V u * u 




758 




000240 




759 


003*^ 30 


000240 




760 


003532 


ono?40 




761 




012737 


01 0060 


762 


003542 




Ci 1 nOfiA 
u i u uo V 


7#^3 


003546 


OQOOOl 




764 


003550 


006 


002 


765 


00 3552 


001404 




766 








767 


003556 


004 


002 


7t>8 


OO356O 


001374 




7b9 


3 S 6 2 


rtn n n n 1 

IH» u u u -l 




770 


003564 


006 


002 


7 7 1 


_ 

00 3 5 6 V 


001230 




7 72 




u u u u u 1 




7 7 3 


003572 


006 


002 


774 


003574 


001232 




775 








776 








777 








778 








779 


003576 


004737 


007606 


780 


003602 


010016 





jEND or PASS 

ITYPE NAMK of test 

I UPDATE PASS COUNT 

iCHECK FOP EXIT TO ACT-U 

I RESTART TEST 



175570 



001327 
001314 



SENDADt 



RESET 




1 MAKE THE WORLD CLEAN AGAIN 


CLR 


LSTERR 


(CLEAP LAST ERROR PC 


CLRB 


ERRFLG 


;CLEAR ERPOF FLAG 


INC 


PASCNT 


(UPDATE PASS COUNT 


MDV 


PASCNTf ^DISPLAY 


iDISPLAY PASS COUNT 


TYPE 


, MEPASS 


yTYPE END PASS 


TYPE 


f MCSRX 


iTYPfc. CSR 


CNVRT 


f XCSR 


jSHOW IT 


TYPE 


,MVECX 


iTYPE VECTOR 


CNVRT 


,XVEC 


J SHOW IT 


TYPE 


,HPASSX 


JTYPE PASSES 


CNVRT 


rXPASS 


fSHOW IT 


TYPE 


f MERRX 


J TYPE ERRORS 


CNVRT 


rXERH 


|SHOW IT 


MOV 


MILKtRO 


fGET POINTER TO PASS COUNT 


HOV 


PASCNTf CR0}t 


1 STORE PASS COUNT FOR THIS DMCll 


HOV 


ERRCNTf (R0}+ 


fSTnoP* PODDQ miiKiT mo tutc rtMn 1 
iwiunci EtKnwK VrUuni run IiIJLb unwll 


DEC 


SAVNUM 




BNE 


RESTRT 


IBR IF NO, 


MOVB 


I377,0V,FLG 


»SET THE QUICK VERIFY FLAG, 


MOV 


DMNUMr SAVNUM 


1 RESTORE THE COUNT 


MOV 


9»42(R1 


ICHECK FOR ACT-11 OR DDP 


BEQ 


RESTRT 


|IF NOT, CONTINUE TESTING 


RESET 




■ STOP THE SHQWaaf^LEAD THE wn&L.n 


JSR 


PCCRl) 




NOP 






NOP 






NOP 






NOP 






KOV 


♦CYCLE, RETURN 




JHp 


CYCLE 




1 

.BYTE 


6*2 




DMCSR 






1 

.BYTE 






DMRVEC 






1 

.BYTE 


6,2 





PASCNT 
1 

.BYTE 



I SCOPE LOOP AND INTERATION HANDLER 



•SCOPE I JSR 
MOV 



PCCKSWR 
ROfCSP) 



jCKECK FOR SOFT 5WR 
I SAVE RO ON THE STACK 
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7fil 


003604 


032777 


040000 


175370 




BIT 


|BIT14|9SWR 


j"LOOP ON THIS TE8T"T 


782 


003612 


001407 






TT5TI 


BEQ 


19 


jBR IF NO, (IF LOCK SW0t=l| THIS LOC s240) 


793 


003614 


000437 








BR 


39 


fGOTO 38 (IF LOCK 8W01«U ^HIS LUC >240} 


784 


0O3616 


005737 


003734 






TST 


DOME 


|HAS TKCSR DONE SET? 


795 


003622 


001434 








BEQ 


3< 


;BR IF NO (LOCKED ON TEST) 


786 


003624 


005037 


003734 






CLR 


DONE 


jYESf CLEAR FLAG 


787 


003630 


000415 








BR 


2S 


jGO TO NEXT TEST 


798 


003632 


032777 


004000 


175342 


ISI 


BIT 


i8Hll,9SHR 


^DELETE ITERATIONT (QUICK PASS) 


789 


003640 


OOlOl 1 








BNE 


2t 


fBR IF YES 


790 


003642 


105737 


001327 






TSTB 


QV.PLG 


(HAVE PASSES BEECONPLETEDT 


791 


003646 


001406 








BEQ 


2f 


yBR IF QUICK PASS. 


792 


003650 


005237 


001224 






INC 


LPCNT 


1 UPDATE ITERATION COUNTER 


79? 


003654 


023737 


001224 


001222 




CMP 


LPCNTrlCOUNT 


(ARE ALL ITERATIONS DONE77 


794 


003662 


101414 








BLOS 


30 


|BR IF NOT YET 




nATAfc4 


10S0?7 


001325 




2«t 


CLRB 


ERRFLG 


J PREPARE FOR NEH TEST 


796 


003670 


005037 


001224 






CLP 


LPCNT 


jSXART ICOUNTER AT 


797 


003674 


005037 


001220 






CLR 


LOCK 




798 


003700 


012737 


000020 


001222 




MOV 


f20,IC0UNT 


fRESET ITERATIONS 


799 


003706 


013737 


001216 


001214 




MOV 


NEXT, RETURN 


fGET NEXT TEST 


800 


003714 


011600 






3SI 


MOV 


(SP),R0 


fPOP RO OFF OF THE STACK 


801 


003716 


022626 








P0P2SP 




fFAKE AN "BTI" 


802 


003720 


013701 


001404 






MOV 


DHCSR,R1 


|R1 CONTAINS BASE DMC ADDRESS 


803 


003724 


000177 


175264 






JMP 


9RETURN 


J GO DO THE TEST 


804 


003730 


001407 






BRWi 


1407 






8 05 


003732 


000437 






BRXt 


437 






806 


003734 


000000 






DONEl 










807 
808 
809 
810 
811 
812 
813 
914 
ei"! 
816 
917 
818 
819 
820 
821 



ICHECK FOR FREEZE ON CURRENT DATA 
, ................................ 



003736 
003742 



004737 
032777 



003750 001405 
003752 005737 



003756 
003760 
003764 



001402 
013716 
000002 



007666 

001000 17S232 



001220 



001220 



.SCOPli JSR 
BIT 
BEQ 
TST 
BEQ 
MOV 

III RTI 



PCfCKSWR 

ISW09,»SWR 

IS 

LOCK 
1« 

LOCK,(SP) 



iCHECK FOR SOFT SWR 
lis SW09»l(SET)? 
|BR IF NOT SET, 



rGOTO THE ADDRESS IN LOCK, 
jGO BACK, 



I TELETYPE OUTPUT ROUTINE 
, ....................... 



822 


003766 


010546 






.TYPEi 


MOV 


R5,-(SP) 


(SAVE R5 ON THE STACK, 


823 


003770 


D17605 


000002 






MOV 


»2CSP),R5 


fGET ADDRESS OF MESSAGE. 


924 


003774 


062766 


000002 


000002 




ADD 


t2(2CSP) 


fPOP OVER ADDRESS. 


825 


004002 


005737 


010016 




491 


TST 


SWFLG 


fSOFT SHR MESSAGE? 


926 


004006 


001004 








BNE 


19 


fir YES TYPE IT OUT REGARDLESS OF SW12 


827 


004010 


032777 


010000 


175164 




BIT 


iSWl2,95MR 


f INHIBIT ALL PRINT OUT?? 


928 


004016 


001012 








BNE 


39 


fBR IF NO PRINT OUT NANTED (SW12*n 


829 


004020 


105715 






19} 


TSTB 


(R5) 


flS NUMBER MINUS? (M5Bb1(BIT7)J 


8 30 


004022 


100002 








BPL 


29 


fBR IF NUMBER IS PLUS 


H Jl 


004024 


104402 


005672 






TYPE 


,MCRLr 


(TYPE A CR/LFl 


832 


004030 


105777 


175154 




291 


TSTB 


9TPCSP 


}TTY READY? 


833 


004034 


100375 








BPL 


29 


fBR IF NO. 


834 


004036 


112577 


175150 






MOVB 


(R5)+,iTPDBR 


jPRlNT CURRENT CHAR, 


835 


004042 


001357 








BNE 


49 


fir NOT ZERO KEEP PRINTINCJ 




nrs4«44 


n!2605 






39t 


MOV 


(SP)+,P5 


I END OF OUTPUT, RESTORE R5 
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PAGtl 0037 



837 


004046 


000002 




Sin 








5 40 


004050 


010346 




^41 


004052 


010446 




«42 


004054 


017637 


000004 


843 


co4r,62 


062766 


G000O2 


844 


004070 


104402 




845 


004072 


nnooOO 




846 


004074 


012704 


007502 


?47 


00 4100 


012703 


00QQ07 


849 


004104 


105777 


175074 


8)» 


004110 


100375 




(350 


004112 


117714 


175070 


851 


004U6 


142714 


000200 


852 


004122 


122427 


000015 


953 


004! 26 


001417 




854 


004130 


105777 


175054 


655 


004134 


100375 




85b 


004136 


017777 


175044 


857 


004144 


005303 




956 


004146 


001356 




fl59 


004150 


012604 




860 


004152 


012603 




861 


004154 


104402 


005666 


862 


004160 


010346 




8f 3 


004162 


010446 




864 


004164 


000741 




8h5 


004166 


012604 




866 


004170 


012603 




867 


004172 


000002 




868 








869 








870 








971 








fl72 


0041 74 


1 0546 




873 


004176 


010446 




874 


004200, 


016605 


000004 


875 


004204 


012537 


004364 


876 


004?t0 


012537 


004366 


877 


00421 4 


012537 


004370 


878 


004220 


112537 


004372 


879 


004224 


112537 


004373 


6t)0 


004230 


010566 


000004 


BSl 


00*234 


005005 




892 


004236 


012704 


007502 


883 


004242 


122714 


000015 


8(^4 


004246 


001420 




3SS 


G04250 


121427 


OD0060 


886 


004254 


002415 




88 7 


004256 


121427 


000067 


838 


004262 


003012 




889 


004264 


142714 


000060 


890 


004270 


152405 




891 


004272 


122714 


000015 


S92 


004276 


001406 





RTI 



004072 

0O00C4 



,MSGl 



175046 



MOV 


R3#-CSP3 


MOV 


H4*-C5P) 


MOV 


^4CSP;# ,KSG 


ADD 


«2r4(SP) 


TYPE 









MOV 


llNBUPf R4 


MOV 


#7#R5 


TSTB 


eTKCSR 


B?h 


It 


M0V8 


»TKDBRf CR4] 


BICB 


I200#CR4} 


CMPB 


(R43+f »15 


BSC 


IN5TR2 


TSTB 


9TPCSR 


BPL 


2$ 


MQV 


»TKDBR,PTPDBR 


DEC 


R3 


BNE 


11 


MOV 


CSP)+rR4 


MOV 


CSP)+,R3 


TYPE 




HOV 


R3f-(SP} 


HOV 


R4f- (SP) 


BR 


.INSTl 


NOV 


C5?j*» k4 


MOV 


(SPJtf R3 


RTI 





ISAVE R3 ON STACK 
jSAVE »4 ON STACK 



I RESTORE R4 
fRESTORE R3 



^CONVERT ASCII STRING TO OCTAL 



MOV 


R5»-CSP3 


MOV 


R4#-CSP3 


MOV 


4(SP3fRS 


MOV 


CR5)+,L0LIH 


MCV 


CR3 5 rihluln 


MOV 


(R5)+#DEVADR 


MOVB 


CR5}tfL06ITS 


MOVB 


(R5)+,ADRCNT 


MOV 


R5r4CSP} 


CLR 


R5 


MOV 


*INBUFfR4 


CMPB 


#15, (R4) 


BEQ 


PARERR 


CMP8 


(R4),*60 


BLT 


PARERR 


CMPB 


(R4),#67 


BGT 


PARERR 


BICB 


«60,CR43 


BISB 


CR4)t,R5 


CMPS 


#i5,£R4) 


BEQ 


LIMITS 
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893 
891 
895 
896 
897 
898 
899 
900 
901 
902 
903 
904 
90S 
906 
907 
908 
909 
910 
911 
912 
913 
914 
915 
916 
917 
918 
919 
920 
921 
922 
923 
924 
925 
926 
927 
928 
929 
930 

932 
933 
934 
935 
936 
937 
938 
939 
940 
941 
942 
943 
944 
945 
946 
947 
948 



004100 006305 

004302 006305 

004304 006305 

004306 000760 



004310 
004312 



004314 
004320 
004322 
004326 
004330 
004334 



004336 
004342 
004344 
004350 
004354 
004356 
004360 
004362 
004364 
004366 
004370 
004372 



104404 
000750 



020537 004366 
101373 

020537 004364 
103770 

133705 004372 
001365 



013704 004370 
010524 

062705 000002 

105337 004373 

001372 

012604 

012605 

000002 

000000 

000000 

000000 

000000 

004373 
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A5L R5 
ASL R5 
ASL R5 
BR It 
PARERRI INSTER 

BR PARAMl 

|T£ST TO SEE ir NUMBER IS WITHIN LIMITS 
J 



PAGEt 0038 



LIMITSi CMP 


R5,HILIM 


BHI 


PARERR 


CMP 


RSiLQLIM 


BLO 


PARERR 


filXB 


LQBITS,RS 


BNE 


PARERR 



f STORE NUMBER AT SPECIFIED ADDRESS 



1st 



LOLIHt 
HILIMi 
DEVADRl 
LOBITSi 



MOV 

HOV 

ADD 

DECS 

BNE 

MOV 

MOV 

RTI 











DEVADR,P4 

R5,CR4)t 

#2,R5 

ADSCN7 
U 

(3P)*,R4 
C5P)+,R5 



ADRCNTsLOBlTS^i 



fSAVE PC OF TEST THAT FAILED AND RO-RS 
, „ 



004374 016637 000004 001276 



.SAV05I HOV 4(8P),SAVPC 
iSAVE RO-RS 



004402 
004406 
004412 
00*416 
004422 
004426 
004432 



004434 
004440 
004444 
004450 
004454 
004460 



010537 
010437 
010337 
010237 
010137 
010037 
000002 



013700 
013701 
013702 
013703 
013704 
013705 



001272 
001270 
001266 
001264 
001262 
001260 



001260 
001262 
001264 
001266 
001270 
001272 



fiVOSi 



MOV 
HOV 
MOV 
MOV 
MOV 
HOV 
RTI 



RS,SAVR5 
R4,SAVR4 
R3fSAVR3 
R2,SAVR2 
RifSAVRl 
ROiSAVRO 



I RESTORE R0-R5 



.RESOSt MOV 

HOV 
MOV 
MOV 
MOV 
MOV 



SAVROfRO 
SAVRlrRl 
SAVR2,R2 
5AVR3,R3 
5'aVR4,R4 
SAVPSfRS 



I SAVE R7 (PC) 



iSAVE R5 

I SAVE R4 

fSAVE R3 

fSAVE R2 

rSAVE Rl 

rSAVE RO 
iLEAVE, 



fRESTORE RO 

IRESTORE Rl 

f RESTORE R2 

I RESTORE R3 

; RESTORE R4 

t RESTORE R5 
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FAGfct 0039 



949 


00446 4 








BTI 


J LtAVt 


95^' 














9S I 










^CONVERT OCTAL NUMBER TO ASCII 


952 














953 
95 4 


004466 


1 i) 4 4 2 


005672 


C N V R I 


TYPE 


r MCRLF 


955 


004 4 7 ;i 


(J 1 00 46 




C ^ VRT 1 


MOV 


BOf "CSP) 


956 


0f(^ 474 


10146 






MOV 


Rl C SP) 


957 


4*76 


1 03 46 






MOV 


P3# -(SP) 


95 ■? 


004500 


010 446 






MOV 


R4# "(SP) 


959 


0045 02 


01 0546 






MOV 


R5 # " C SP ) 


960 


004504 


017601 


00001 2 




MOV 


?12CSP) 1 Bl 


96 1 


004510 


06 2766 


ouuuu* ooun I / 




ADD 


I2# 1 2 t SP) 


9b2 


0045 J 6 


0121 37 


UU 4/10 




MOV 


C Rl ) + # WPDCNT 


9fo 3 


00 45 22 


112137 


00471? 


ft 


MOVB 


C R 1 ) + 1 LnKL N r 


9^4 


0045 2b 


112137 


00 4713 




M0V8 


( Rl ) + f SPACNT 


965 


00 45 J 2 


01 3137 


A A A ? 1 A 

004/14 




MOV 




96b 


'^^'^^^^ 




UuvvUJ vXJtfit 




CMpB 




96 7 


004544 


00 1003 






BNE 


29 


96? 


0045 46 


" * ^ T A I 


i77dnn nn47i4 




BIC 


• l77400#i3AriWj<u 


969 


004554 


013704 


A A A 7 1 A 


2$ t 


MOV 


BINWRDr B4 


97 


n n /I e A A 
U 5 D 








MOVB 


CHRCNTr R5 


9 71 


004564 


012700 






MOV 


ITEMPjRO 


97 2 


004570 


\ 0**0 J 




3 3 1 


MOV 


R4r R3 


97 3 


004572 








BIC 


#177770#R3 


97 4 










ADD 


#060» R3 


975 


00 4^02 


1 1 320 






MOVB 


R3, (R0)+ 


976 


004504 


000 241 






CLC 




977 


004606 


06004 






ROR 


R4 


97B 


O046 1 


U0024 1 






CLC 




979 


004612 


006004 






ROR 


B4 


990 


004614 


000241 






CLC 




981 


0046 1 6 


(506004 






ROR 


R4 


9 P 2 


0046 20 


(j05 305 






DEC 


B5 


98 3 


004622 


001362 






BNE 


3$ 


98 4 


004624 


012703 


007544 




MOV 


#HDATA#R3 


985 


004630 


11402 3 




45 t 


MOVB 


-CR0),CR3)+ 


986 


0046 32 


1053 37 


00471 2 




DECB 


CHRCNT 


9rt7 


004636 


001374 






BNE 


4» 


988 


004640 


105737 


004713 




TSTB 


SPACNT 


9?9 


004b44 


001405 






BEQ 


6$ 


990 


004646 


112723 


000040 


581 


MOVB 


•040# (B3)+ 


991 


00465 2 


lo5337 


0047 1 3 




DECB 


SPAChfT 


992 


004656 


00 1 37 3 






BNE 


5S 


99 3 


004660 


1 5 f > 1 3 




681 


CLRB 


CR3) 


991 


4 6 6 2 


104402 


007544 




TYPE 


,MDATA 


995 


O04666 


005 3 37 


0047 1 




DEC 


WRDCNT 


996 


004672 


001313 






BNE 


19 


997 


004674 


012605 






MOV 


CSP3+,B5 


998 


004676 


012604 






MOV 


CSP)f ,R4 


999 


004700 


012603 






MOV 


CSP)+,R3 


1 uoo 


004702 


0» 2601 






MOV 


C5P)+,R1 


tool 


004704 


012600 






MOV 


C5P)+,R0 


1002 


004706 


000002 






RTI 




100 3 


004710 


000000 




WPDCNTI 







1004 


004712 


OQOOOO 




CHRCNTi 









'^MCyll 


30(1046) 
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Ptl 12 


-MAY-77 


14118 




1005 




004713 






1 006 


004714 


000000 






1007 










10O8 










1 009 










1010 










1011 










1012 










1013 










101 4 


004716 


011646 






1015 


004720 


162716 


000002 




1016 


004724 


017616 


000000 




1017 


004730 


006316 






1016 


004732 


042716 


177001 




1019 


004736 


062716 


001330 




1 020 


004742 


017616 


000000 




1021 


00474b 


000136 






1022 










1023 










1024 










10?5 










1026 


004750 


004737 


007606 




1027 


004754 


032777 


010000 


174220 


1028 


004762 


001406 






1029 


004764 


105777 


174220 




1030 


004770 


100003 






1031 


004772 


1 1 2777 


000207 


174212 


1032 


005000 


032777 


020000 


174174 


1033 


O05006 


001105 






1034 


005010 


021637 


001234 




1035 


005014 


001404 






1036 


005016 


011637 


001234 




1037 


005022 


105037 


001325 




1038 


005026 


104406 






1039 


005o30 


011605 






1040 


005032 


162705 


000002 




1041 


005036 


011504 






1042 


005040 


006304 






1043 


005042 


061S04 






1044 


005044 


006304 






1045 


005046 


042704 


177001 




1046 


005052 


062704 


031660 




1047 


005056 


012437 


005172 




1048 


005062 


012437 


005204 




1049 


005066 


OU437 


005216 




1050 


005o72 


105737 


001325 




1051 


005076 


001403 






1052 


005 I 00 


005737 


005215 




1053 


005104 


001040 






1054 


005 J 06 


104402 


005672 




1055 


0051 12 


194402 


005672 




105 6 


005116 


005737 


001220 




1057 


005122 


001402 






105 9 


0051 24 


104402 


006U2 




tft59 


0051 30 


104402 


006130 




i'''60 


0051 34 


104411 


005330 





GENERAL UTILITIES (TYPEOUT* ERROR, SCOPE, ETC) 



SPACHT=CHRCNT+l 
BINHRDi 



PAGEj 0040 



fTRAP DISPATCH SERVICE 

;ApGUMENT OF TRAP IS EXTRACTED 

jAND USED AS OFFSET TO OBTAIN POINTER 

|T0 SELECTED SUBROUTINE 



MOV 


(SP),-(SP) 


I GET PC OF RETURN 


SUB 


«2#CSP} 


I "PC OF TRAP 


HOV 


9(SP),(SP) 


J GET TRP 


ASL 


(SP) 


(MULTIPLY TRAP ARG BY 2 


BIC 


#177001, CSP) 


}CLEAR UNWANTED BITS 


ADD 


f .TRPTAB, (SP) 


IPOINTER TO SUBROUTINE ADDRESS 


MOV 


»(SP),(SP) 


1 SUBROUTINE ADDRESS 


JMP 


9(SP}1- 


(GO TO SUBROUTINE 


» ERROR 


HANDLER 




JSR 


PCfCKSHR 


(CHECK FOR SOFT SWR 


BIT 


*5N12,»SInR 


}BELL ON ERROR? 


BEQ 


XBX 


|BR IF NO BELL 


TSTB 


8TPC5R 


jTTY READY. 


BPL 


XBX 


jDDN'T WAIT IF TTY NOT READY, 


MOVB 


I207#9TPDBR 


(PUSH A BELL AT THE TTY, 


BIT 


tSW13,@SWR 


lOELETE ERROR PRINT OUT? 


BNE 


HALTS 


}BR IF NO PRINT OUT WANTED, 


CMP 


(SPJfLSTERR 


IWAS THIS ERROR FOUND LAST TIME? 


BEQ 


1$ 


|BR IF YES 


MOV 


tSP),LSTERP 


1 RECORD BEING HERE 


CLRB 


ERRFLG 


(PREPARE HEADER 


SAV05 




(3AVE ALL PROC REGISTERS 


HOV 


(SPJ,R5 


(GET THE PC OF ERROR 


SUB 


*2f R5 


(GET ADDRESS OF TRAP CALL 


MOV 


CR5),R4 


(GET HLT INSTRUCTION 


ASL 


P4 


J MULT BY TWO 


ADD 


(P5},R4 


(DOUBLE IT 


ASL 


R4 


(MULT AGAIN 


BIC 


#177001, P4 


(CLEAR JUNK 


ADD 


#,ERRTAB,R4 


(GET POINTER 


MOV 


(R4)+,ERRMSC 


(GET ERROR «ESSAGC 


MOV 


(B43+,DATAHD 


(GET DATA HFADRER 


MOV 


tP4),DATABP 


(GET DATA TABLE 


TSTB 


ERPFLG 


(TYPE HEADPEER 


BEQ 


TYPMSG 


fBR IF YES 


TST 


DATABP 


yDDES DATA TABLE EXtST? 


BNE 


TYPDAT 


jBR IF YES, 


TYPE 


, MCRLF 




TYPE 


, MCRLF 




TST 


LOCK 




BEQ 


19 




TYPE 


,MASTEK 




TYPE 


»MTSTN 
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PAGKl 0041 







104402 


00fo2 1 7 






1 (} 4 4 1 1 


005329 






104402 


005672 


! rift a 


- 


1 12737 


177777 


1 0o5 


05 62 


11 % 7 3 7 


00317? 




005 1 o6 


01402 






005 l70 


104402 




1 06S 









1 069 


00517 4 






1070 


00517 4 


0057 37 


005204 


1071 


005200 


00 1402 




1072 




1 04402 








A n fi n ft 

U I) U U U V 




1074 




005737 


005216 


1075 




001 402 








1 04410 




1077 


00521 6 


000000 




107 8 


005220 


104407 




1079 


0052 22 


022737 


003522 


1080 


0052 30 


001403 




1 OS 1 


005232 


005777 


173744 


1082 


005?36 


iOOOOS 




106 3 


0052 40 


010046 




1 0^4 




1 6ft00 


000002 


1 0S5 


u VI 1? ^ •! a 


000000 




1086 


005 ?50 


01 2600 




106 7 




005237 


001232 


1 08 6 


005256 


032777 


000400 


1 090 




001007 






005266 


032777 


002000 


1 09 1 








1092 


005276 


013737 


001316 


1 09 3 


1.1 u 3 J V * 




001 200 






013701 


00 1 404 


1 nqn 






173674 


1096 


0053*0 


V VI V U * 




1097 


005 3 22 


00000 1 




109? 


005324 


006 


002 


1099 


005326 


001276 














I* J. 1* 


003 


002 


- -I 




001 225 




1 1 03 








4 ni 








1 i rtR 








1 tOb 








1 107 


005^36 






I tf>9 


005336 


012737 


005350 


1109 


005344 


000000 




11 to 


005346 


000777 




lUl 








1112 








1113 








1U4 


005350 






1115 


005350 


012737 


005336 


lllb 


005356 


012706 


001200 



ERFMSGl 



D&TAKD: 
TYPDATi 



DATABPi 
RESREGl 
HALTSI 



EXITCRl 



TYPE 


,MERSPC 


JTYPE PC, 


CNVPT 


lERTABU 


jSHClwl IT 


TYPE 


,F4GBLF 


fCiIVE A CR/LF 


MOVB 


9-li EHRFLG 


fNU MORE HEADEH UNLESS NO DATA TABLE 


TST 


EPRMSG 


fiS THERE ERROR MESSAGE? 


BEQ 


WPKO.FM 


JBR IF NO* 


TYPE 




jTYPE 







1 ERROR MESSAGE 


TST 


DATAHD 


! 

?DATA HEADER? 


BEQ 


TYPDAT 


J BR IF NO 


TYPE 




ITYPE 







I DATA HEADER 



2$t 

EPTABOt 



TST 
BEQ 

CONVRT 


PESOS 

CMP 

BEQ 

TST 

BPL 

PUSHBO 

MOV 

HALT 

POPRO 

INC 

BIT 

BNE 

BIT 

BEQ 

MOV 

MOV 

MOV 

JMP 

RTI 

1 

.BYTE 
SAVPC 
1 

.BYTE 
TSTNO 
} ENTER 



DATABP 
RESREG 



*tENDADiei42 
II 

95WP 
EXXTCR 

2CSP5,RO 

ERRCNT 
iSWOSr^SWR 

ii 

«SW10f 0SWR 
2> 

NEXTf RETURN 
iSTACKfSP 
DMCSRf Rl 
9RETURN 

HERE ON POWER 



IDATA TABLE? 
|BR IF NO, 
)SHOM 

t DATA TABLE 

r RESTORE PROC REGISTERS 

I IF ACT-ll AUTOMATIC MODE, HALTU 

I HALT ON ERROR? 

>BR IF NO HALT ON ERROR 

I SAVE RO 

I SHOW ERROR PC IN DATA LIGHTS 

fHALT 

I GET RO 

(UPDATE ERROR COUNT 
I GOTO TOP OF TEST? 
fBR IF YES 
fGOTO NEXT TEST? 
I BR IF NO 

»SET FOR NEXI fEBT 
) RESET SP 
»5ET UP Bl 

(GOTO SPECIFIED TEST 
} RETURN 



.PFAILt 



|RESTART,24 



fSET UP FOR POWER UP TRAP 
jHALT ON POWER DOWN NORMAL 



MOV 

HALT 

BR 



iPROCESSOR WILL TRAP HERE WHEN POWER IS RESTORED 



RESTARl 



MOV 

MQV 



f .PFAIL»24 

ISTACKjSP 



ISET UP FOR POWER FAILURE 
I RESET THE STACK POINTER 
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OZDME, 


»11 12 


-*4AY-7? 


14116 


1U7 


005362 


013701 


001404 


1118 


005366 


005037 


001416 


1 119 


005372 


005237 


001416 


1120 


005376 


001375 




1121 


005400 


104402 


005675 


1122 


005404 


104411 


005430 


1123 


00S410 


105037 


001325 


1124 


005414 


005037 


001234 


1125 


005420 


005011 




1126 


005422 


104412 




1127 


005424 


000177 


173564 


1128 


005430 


OOOOOl 




1129 


005432 


003 


002 


1130 


005434 


001226 




1131 








1132 


005436 






1133 


005436 


012777 


000020 


1134 


005444 


104414 




1135 


005446 


121111 




1136 


005450 






1137 


005450 


104414 




1139 


005452 


121224 




1139 


005454 


032777 


000020 


1140 


005462 


001772 




1141 


005464 


000002 




1142 








1143 


005466 






1144 


005466 


152777 


OOOiOO 


1145 


005474 


142777 


000300 


1146 


005502 


000002 




1147 








1146 


005504 






1149 


005504 


152777 


000002 


1150 


005512 


013677 


173676 


1151 


005516 


062746 


000002 


1152 


005522 


032777 


000100 


1153 


005530 


001401 




1154 


005532 


000000 




1155 


005534 


152777 


000003 


!l5fe 


QQ5542 


14277? 


000007 


1157 


005550 


000002 




1158 








1159 


005552 






1160 


005552 


013637 


001416 


1161 


005556 


062746 


000002 


1162 


005562 


152777 


000020 


1163 


005570 


027777 


173610 


1164 


005576 


142777 


000020 


1165 


005604 


005337 


001416 


1 166 


005610 


001364 




1167 


005612 


000002 




1166 


005614 


OOOOOl 




1169 








1170 


0Q56U 






1171 


005616 


013637 


001416 


1172 


005622 


062746 


000002 
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PFTABi 
.BYTE 



MOV 

CLR 

INC 

BNE 

TYPE 

CNVRT 

CLRB 

CLR 

CLR 

MSTCLB 

JMP 

1 

3,2 

TSTNO 



.DELAYi 



MOV . 
ROMCLK 
121111 

ROMCLK 

121224 

BIT 

BEQ 

RTI 



DMCSR,R1 

TEMP 

TEMP 

,MPFAIL 

,PFTAB 

ERRFLG 

LSTERR 

CPU 

•RETURN 



I20,»DMP04 



iBIT4,9DMP04 
1» 



173712 
173704 



173674 
173452 



173644 
173636 



173616 

173606 
173602 



.MSICLBl 



BI8B 
BICB 
RTI 



•ROMCLK I 



BISB 

MOV 

ADD 

BIT 

BEQ 

HALT 

BISB 

BICB 

Kf i 



I RESTORE Rl 

(READY FOR TIMMER 

jPLUS ONE TO THE TIMERl 

»BR IF MORE TO GO 

I TYPE THE MESSAGE 

I TELL WHAT TEST TO RETURN TO, 

I START CLEAN 

I"""""""*'"'" 

iCLEAR HAINT BITS 

t START CLEAN UP OF DEVICE 

(START DOING THAT TEST AGAIN, 



fNEXT WORD IS INSTRUCTION, ROMCLK PCa5304 
(POKE CLOCK DELAY BIT 

(NEXT WORD IS INSTRUCTION, ROMCLK PC«5304 
(P0RT4«IBUS*11 
(IS CLOCK BIT SET? 
(BR IF NO 



«BlT6,fDNC8RH (SET MASTER CLEAR 
#6IT61BIT7,eDMCSRH (CLEAR MASTER CLEAR AND RUN 
(RETURN 



•BIT1,»DMCSRH (SET ROHI 
9{SP)+,eDMP06 (LOAD INSTRUCTION IN 8EL6 
I2f-(SP) (ADJUST STACK 

#SW06,»SWR (HALT IF SW06 «1 

It (BR IF SW06 mO 

(HALT BEFORE CLOCKING INSTRUCTION 
|BITnBIT0,9DMCSRH (CLOCK INSTRUCTION 
tBlT2lBlTltBIT0,»DMC8RH rCLEAR ROMO, ROMI, STEP 



.DATACLKl 





HOY 


KSPJtfTEMp 


(PUT TICK COUNT IN TEMP 




ADD 


*2»-CSP) 


(ADJUST STACK 


ISI 


BISB 


fBlT4,iDMC6RH 


(SET STEP LU 




CMP 


•DHCSR,»DMCSR 


(WASTE TIME 




BICB 


fBIT4,iDMCSRH 


(CLEAR STEP LU 




DEC 


TEMP 


(DEC TICK COUNT 




BNE 


11 


(BR IF NOT DONE 




RTI 




(RETURN 


311 


.BLKW 


1 


.TIMERl 










MOV 


•CSP)+,TEMP 


(MOVE COUNT TO TEMP 




ADD 


f2i-(8P) 


(ADJUST STACK 





•T^CVI 1 


30 n f'46} 
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UTILITIES (TYPtOUTf SCPP& , KTC ) 


1 1 7i 


Os.t'S^, 2ft 














1174 




10 441 4 








POMC LK 




1 ns 


5630 


021364 










• DfUJTJ TnilQM Otfl* 


] 1 76 


IJ056 32 


'132777 


0OOU02 


173552 




BIT 




1177 


005640 


(101 772 








BEU 


16 • BP I K S 


1178 


rw)564 2 








2 $ I 






1179 




1 04414 








ROMCLK 


{NEXT WORD TS IFSTRUCTiUii, HQMCLK PCs5304 


tigo 


005644 


021364 








021364 


;PUPT4.IBUS* Rfc-Gll 


tiei 


0O«i646 


032777 


00 one 2 


173536 




BIT 




1 1 2 


'10565 4 


001372 








3NE 


7fi tBR IV YF^ 


1163 


005656 


005337 


001416 






DEC 




1 1 «?4 


Oo56t-2 


001 361 








BNE 




1 1 95 
1 I 86 


01)566 4 


000002 








RTI 


• RETURN 


1 187 


005 666 


0200 40 


000077 




MQH { 


ASC I Z 


/If 


(2) 


O0«)67 2 


005015 


ooo 




MCPliFl 


ASCIZ 


< 15>< 1 2> 


(2) 


005675 


377 


053520 


020122 


MPFAiH 


« ASC I Z 


<377>/P'mR FAITjED, RESTART AT TEST / 


(2) 


005733 


377 


047105 


020104 


MtP ASS 1 


t ASCIZ 


<377>/END PASS DZDME / 


C?) 


00575-5 


377 


000122 




MH 1 


t ASCXZ 


<377>/P/ 


C?) 


05 76'^ 


047377 


020117 


042504 


MKRR2 f 


t AgCIZ 


<377>/NO DEVICES PRESENT / 


t?) 


0fi6005 


377 


047tll 


052S23 


I^CFR3 1 


■ASCIZ 


<377>/INSUFFICIENT DATAt/ 


(2) 


nQ6fi31 


377 


042524 


052123 


MTSTPC t 


(ASCIZ 


<377>/TEST PC-/ 


C2) 


006043 


377 


047514 


045503 


MLOCKi 


t ASC I Z 


<377>/IjOCK on selected TEST/ 


(?) 


006072 


051503 


35122 


000040 


MCSRXt 


t ASCIZ 


/CSRi / 


(2) 


006100 


042526 


035103 


000040 


MVECXl 


t ASCIZ 


/VECI / 


C2) 


006106 


040520 


051523 


051505 


MPASSX 1 


t A SC I Z 


/PASSESt / 


C2) 


006117 


105 


051122 


051117 


MEHRXl 


, ASCIZ 


/ERPORSt / 


c?) 


0061 3U 


042524 


052123 


047040 


MTSTN 1 


t ASCIZ 


/TEST NOi / 


C2) 


006142 


000052 






M ASTEK 1 


•ASCIZ 


/* / 


C?) 


0061 44 


051777 


0S2105 


051440 


HNEWl 


• ASCIZ 


<377>/5ET SWITCH PEG TO DMCll'S DESIRED ACTIVL / 


(21 


006217 


120 


035103 


000040 


MIT Dp or « 


•ASCIZ 


/PC 1 / 


(2) 


006224 


U20212 


020040 


020040 


XHEAD 1 


(ASC 1 1 




(2) 


006263 


377 


020040 


020040 




t ASCII 




(2) 


006322 


020212 


050040 


020103 




•ASCII 


<212>/ PC CSR STATl STAT2 STAT3/ 


C2) 


006374 


026777 


026455 


026455 




•ASCIZ 


<377>/...«._ ...... ....../ 


(2) 


006450 


044377 


053517 


046440 


NUM J 


•ASCIZ 


<177>/HDW MANY DMCtl'S TO RF TESTFD? / 


C2) 


006510 


041777 


051123 


040440 


CSR: 


(ASCIZ 


<377>/CSR ADDRESS?/ 


(2) 


006526 


053377 


041505 


047524 


VEC * 


•ASCIZ 


<377>/VECTOP ADDRESS?/ 


(2) 


065 47 


377 


051102 


050040 


PP 


•ASCIZ 


<177>yBR PRTDRTTY LFVFI.? f4.S.6.7^7/ 


(2) 


006606 


044777 


020106 


046504 


CRAMi 


•ASCIZ 


<377>/IF DMC HAS CRAM CM8204) TYPE "Y", IF CRUM (M8200) TYPE " 


(2) 


OO6704 


053777 


044510 


044103 


MODUj 


•ASCIZ 


<377>/!*HICH LINE UNIT? IF NQNE TYPE IF Mti2Dl TYPE "1% IF 


(2) 


00701ft 


051777 


044527 


041524 


FjINEi 


• nov. X ti 




C 2) 


(t 7 05 4 


(*5 1777 


044527 


041524 




• ASCIZ 




(?) 


Ort7l 14 


044777 


020123 


044124 


CONN I 


• ASCIZ 


<377>/IS THE LOOP BACK CONNECTOR ON?/ 


f ?) 


07154 


047377 


020117 


042504 


NOACXt 


•ASCIZ 




r, 2) 


007205 


377 


051412 


051127 




• ASCIZ 




(2) 


007215 


116 


053505 


020077 


CUIMP Q1 1 




/NEW? / 


(2) 


ftn7?2> 


377 


042377 


041515 


^ u ni j!^ r\t^ i 






(2) 


'•07271 


377 


054105 


042520 


C N ERR t 


* ASCIZ 


* 177* /F Y DFr T(rn rnnwny 


(2) 


(107 320 


024040 


046504 


024503 


DMCMl 


•ASCIZ 


/ CDMC) / 


(2) 




024040 


046513 


024503 


KMCMj 


•ASCIZ 


/ (KMC) / 


(23 


007340 


042377 


041515 


030461 


SPEED t 


.ASCXZ 


<377>/DHCll-ARCREMQTE,LOW SPEED) OR DMCl 1-AL(L0CAL, HIGH SPEED: 


( 2 ) 










.EVEN 






(?) 


0!)7454 


000005 






XSTATOl 


5 




1 t 06 


007456 


00b 


003 






.BYTE 


6r3 


I 1 


fin? 46 


or>i 246 








TEMPI 
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GEMFJRAL UTILITIES (TYPEDUT* EPPOR, 


SCOPE, ETC) 


1190 


007 46 2 


006 


0O3 






.BYTE 


6,3 




1191 


0'17464 


POl 250 








TEHP2 






1192 


IV)7466 


006 


003 






• BYTE 


6,3 




1193 


007470 


001252 








TEMP3 






1 104 


7 4 7? 


006 


003 






• BYTE 


6,3 




1195 


007474 


O01254 








TEMP4 






I 1 96 


')C7476 


006 


002 






• BYTE 


6,2 




1 197 


OO7500 


001256 








TEMP5 






1 1 99 










• EVEN 








\ 1 99 


















1200 












IBUFFERS FOR INPUT- 


OUTPUT 


1201 


















1202 


0^t7^02 


010000 






INBUFJ 









1203 




O07544 






,3, +40 








1204 


0!<7544 


000000 






^'DATA: 













u ) ; 6 6 






• a, +40 








1206 


















1207 


















1209 












fPOUTINE USED TO CHANGE SOFTWARE SWITCH 


1 209 
1210 












, REGISTER USING THE 


CONSOLE TERMINAL 


1211 


















1212 


007606 


022737 


000176 


001202 


CKSWRi 


CMP 


tSWREG,SWP 


»IS THE SOFT SWR BEING USED? 


121 3 


007614 


001077 








BNE 


CKSWR5 


jBR IF ND 


1214 


00761 6 


105777 


171362 






T5TB 


9TKC5R 


fIS DONE SET? 


1215 


007622 


100003 








BPL 


2$ 


»G0 ON IF NOT SET 


1216 


007624 


012737 


177777 


003734 




MOV 


«-l,DONE 


rIF DONE SET, SET FLAG 


1217 


007632 


022777 


000007 


171346 


2SI 


CMP 


#7,^TKDBR 


jWAS CTRL G TYPED? (7 BIT ASCII) 


1218 


007640 


001404 








BEQ 


IS 


jBR IF YES 


1219 


007642 


022777 


000207 


171336 




CMP 


#207,PTKDBR 


^WAS CTRL G TYPED? £8 BIT ASCII} 


1220 


007^50 


001061 








BNE 


CKSWR5 


|BR IF ND 


1221 


007652 


010246 






l$l 


MOV 


R2,-CSP} 


I STORE R2 


1222 


007654 


010346 








MOV 


R3»-CSP) 


1 STORE R3 


122 3 


007656 


010446 








MOV 


R4,-£SP) 


I STORE R4 


1224 


007660 


0J2737 


177777 


010016 




MOV 


l-l,SWFLG 


fSET SOFT TYPE OUT FLAG 


1225 


007666 


OO5002 






CKSWRlt 


CLR 


P2 


fCLEAR NEW SWR CONTENTS 


1226 


007670 


012704 


177777 






MOV 


lt-l,P4 


rSET FLAG TO ALL ONES 


1227 


007674 


1 '14402 


00720S 






TYPE 


,SWMES 


fTYPE "SWRa " 


1228 


O07700 


104411 






CK5WR2I 


CNVPT 




iTYPE OUT PRESENT CONTENTS 


1279 


O07702 


010052 








50FTSW 




|0F SOFT SWITCH REGISTER 


1230 


07 70 4 


104402 


007215 




CKSWB3I 


TYPE 


,SMMESl 


jTYPE "NEW? " 


1231 


0077 1 


004737 


010020 




CKSWR4I 


JSP 


PCINCHAP 


jGET RESPONSE 


1232 


0O7714 


022703 


000015 






CMP 


«15,R3 


jWAS IT A CP? 


1233 


007720 


U01424 








BEQ 


5$ 


|BR IF YES 


1 ?34 


007722 


022703 


000012 






CMP 


«12,R3 


jWAS IT A LF? 


J 235 


1107726 


001416 








BEQ 


4S 


jBR IF YES 


1736 


'107 73n 


022703 


000025 






CMP 


(t25,R3 


jWAS IT CTRL U? 


1237 


U >7734 


O01754 








BEQ 


CKSWRi 


iBP IF YESCSTART OVER) 


1218 


'17736 


022703 


000007 






CMP 


»7,R3 


fIF CNTL G GET ^EXT CHAP 


\7}9 


t1 7 7 4 3 


or>l752 








BEQ 


CKSWB4 




12 40 


(107744 


005004 








CLR 


P4 


jIT MUST BE A DIGIT SO CLR FLAG 




007746 


042703 


177770 






BIC 


•17 7 7 7 0,33 


J ONLY 0-7 Af'E LEGAL SO MASK OFF BXTS 


12 42 


0^7752 


UO6302 








ASL 


R2 


iBHUT R2 3 TI^?S 


1243 


007754 


006302 








ASL 


R2 




1744 


'^07756 


006 302 








ASL 


P2 




n4»i 


-.■17 76 


050302 








^1$ 


R3.S2 


TftPn LAST DIGIT 





Miryl 1 


\t t t 046 1 


1 i-JUL 


DZDM£,?11 \2 


• M A Y • 7 7 


1 4 1 1 




0'j7762 


0075 2 




1?47 


U07764 


012766 


002002 




007772 


005704 




1?49 


(>0777 4 


001002 




1250 


007776 


01 0277 


171200 


1 2*5 I 


010002 


005037 


010016 


12"5 2 


01 0006 


1 2604 




i25? 


01 GO 10 


01 2603 




1254 


010012 


n 1 2602 




1255 


01 0014 


ftno9n7 

U U V ^ u f 




1256 








3 257 


* ?) 1 6 


oocooo 




1258 








1259 


010020 


105777 


171160 


126 


010024 


1 U0375 




1261 


'>1 0026 


017703 


171154 


\7h7 


010032 


1 0577? 


171152 


1263 


010036 


10037S 




1264 


010040 


010377 


171146 


1265 


010044 


042703 


000200 


1266 


010050 


000207 




1267 








1 288 


01 0052 


OOOOOl 




1269 


010054 


006 


002 


1270 


010056 


000176 





11140 PAGt 26 

GENERAL UTiLITICS CTJPtnUT, ERHUB, SCnHt, 



PAGEl 0045 





BR 


C'<SWP4 


jGET MEXT CHARACTER 


4$| 


MOV 


» ,51 Ar 1 # O t 5P J 


*rc" Sjjive TWDCT^ en f^r\ ctadt 
JLir -^Ao TlP^U 50 Xu oiAHi 


5SI 


1ST 


R4 


!IS FLAG CLEPR? 




BNE 


6S 


; IF NOT DON'T CHANGE SOFT SirfR 




MOV 


H2#PSWp 


ilF t^S THEN WRITE NE^^ CuKTENiS 


&Si 


CLR 


SWFLG 


jCliEAR T^PtOUT FLAG 




HOV 


(SP)+*R4 


J RESTORE P4 




piQV 




i RESTORE R3 




MOV 


CSP)+iR2 


J RESTORE R2 


CKSWP5: 


RTS 


PC 


JRETUPN 


SWFLGl 









INCHARI 


TSTB 


gTKCSR 






BPL 


.-4 






MOV 


PTKDBR'»P3 






TSTB 


0TPCSR 






BPL 


• •4 






MQV 


R3,eTPDBR 






BIC 


#BIT7,R3 






RTS 


PC 




SOFTSWt 


I 








.BYTE 


6*2 






SWREG 







Tn SOFT 5«B 
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1271 
1272 
1273 
1274 
1275 
1776 
1277 
1278 
1279 
1 ?P0 
1 2fll 
1292 
1283 
1 ?B4 
I2fl5 
1286 
12B7 
12P« 
1 2i?9 
1 290 
1 291 
1292 
1 ?93 
1294 
1295 
1296 
1297 
1298 
1299 

noo 

1 301 
1302 
1 303 
1 3<i4 
1305 
1306 
130? 

1 3oe 

1309 
1310 
1311 
1312 
1313 
1314 
1 315 
1316 
131? 
1318 
1319 
1320 
1321 
1322 
1323 
i 3 Z T 
1325 
1326 



IROUTINE USED TO "CKCLE* THROUGH UP TO 16 DMCll'S 

JTHIS ROUTINE SETS UP THE CONTROL ADDRESS FOR THE DIAaSuSTic 

yAND RUNS THE SPECIFIED DMCll'S, THIS ROUTINE «MUST* 

jBE RUN FIRST BEFORE ENTERING THE DIAGNOSTIC FDR THE 

I SETUP NECESSABV. 

I 



010060 


005737 


00*305 




CYCLE! 


TST 


OMACTV 


J ARE ANY DMCll'S TO BE TESTED? 


01 0064 


001004 








BNE 


11 


J BR IF QK. 


010066 


104402 


007154 






TYPE 


,NOACT 


»N0 DMCU'S SELECTED! i 


010072 


000000 








HALT 




jSTOP THE SHOW, 


010074 


000776 








BP 


.-2 


jDISQUALIFV CONT, SW, 


010076 


000241 






l$t 


CLC 




iCLEAR PROC, CARRY BIT, 


010100 


006137 


001316 






ROL 


RUN 


^UPDATE POINTER 


010104 


005537 


001316 






ADC 


PUN 


J CATCH CARRY FROM RUN 


01 Olio 


062737 


000004 


001322 




ADD 


#4|MILK 


1 UPDATE POINTER 


010116 


062737 


000010 


001320 




ADD 


#10, CREAM 


jUPDATE ADDRESS POINTER, 


010124 


022737 


001700 


001320 




CMP 


iDM«MAP+200,CPEAM 


010132 


001006 








BNE 


2$ 


IKEEP GOINGi NOT ALL TESTED FOR 


01 0134 


012737 


001500 


001320 




MOV 


IDM, HAP, CREAM 


f RESET ADDPE6S POINTER. 


ni ni 4? 




001702 


001325 




MOV 


*CNT. MAP-MILK 


t RESET PASS COUNT POINTER 


010150 


033737 


001316 


001306 


2$: 


BIT 


RUMiDMACTV 


lis THIS ONE ACTIVE? 


01 0156 


0017 47 








BEQ 


1$ 


»BR IF ^0 


010160 


013700 


001320 






MOV 


CREAM, RO 


J GET ADDRESS POINTER 


010164 


013702 


001322 






MOV 


MILK,R2 


»GET PASS COUNT POINTER 


010170 


012037 


001404 






MOV 


tR0)*,DMCSR 


jLOAD SYSTEM CTRL, REG 


010174 


01 1037 


0Q1374 






MOV 


CRO),DMRVEC 


jLaAD VECTOP 


01U200 


042737 


177000 


001374 




BIC 


1177000, DMRVEC 


fCLEAR UNWANTED BITS 


010206 


012U37 


001366 






MOV 


CRO)t,STATl 


(LOAD STATl 


010212 


012037 


001370 






WOV 


CR0)+,STAT2 


J LOAD STAT2 


010216 


012037 


001372 






MOV 


CR0)+,5TAT3 


ILOAO STAT3 


010722 


012237 


001230 






MOV 


CR2>+,PASCNT 


ILOAD PASS COUNT 


010226 


012237 


001232 






MOV 


(R2)+,ERRCNT 


}LOAD ERROR COUNT 


010232 


012700 


000002 






MOV 


»2,R0 


ISAVE CORE THIS WAYl 


010236 


013737 


001404 


001406 




MOV 


DMCSR,DMCSRH 




010244 


005237 


O01406 






INC 


DHCSRH 




010250 


013737 


001406 


001410 




MOV 


DMC5RH,DMCTL 




010256 


005237 


001410 






INC 


DMCTL 




010262 


013737 


001410 


001412 




MOV 


DMCTL,DMP04 




010270 


060037 


001412 






ADD 


R0,DMPO4 




010274 


013737 


0014J2 


001414 




MOV 


DMPO4,DMP06 




010302 


060037 


001414 






ADD 


R0,DMP06 




010306 


013737 


001374 


001376 




MOV 


DHRVECDMRLVL 


|PTY LVL 
1 


010314 


060037 


001376 






ADD 


ROfDHRLVL 


010320 


013737 


001376 


001400 




MOV 


DHRLVL,DHTVEC 


;TX VEC 


010326 


06 00 3 7 


001400 






ADD 


RCDMTVEC 


010332 


013737 


001400 


001402 




MOV 


DHTVECDHTLVL 


;TX LVL 


010340 


060037 


001402 






ADD 


P0,DHTLVL 




010344 


032737 


000002 


001236 




BIT 


iSW01,STRTSW 


lis TEST NO, SELECTED 


010 552 


QG i 450 










7 i 




010354 








481 








010354 


005737 


000042 






TST 


9*42 


fPUNNING IN AUTO MODE? 
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1327 


01036') 


001045 






BNE 


7S 


18R IF YES 


1 329 


010362 


104402 


005672 




TYPE 


,MCPLF 




1329 


01 036fi 


104403 






INSTR 




>GLT TEST NO, 


U^O 


01 0370 


06130 






MT5TN 






1311 


fJ10372 


104405 






PARAM 






! 33? 


010374 


(100001 






1 






1333 


010376 


ootooo 






1000 






1 334 


01 0400 


001226 






TSTNO 






1335 


010402 


000 




.RYTE 









1336 


010403 


001 




.BYTE 


I 






1 337 


01 0404 


012700 


012320 




MOV 


#TST1,R0 




1 338 


010410 


022710 




5$t 


CMP 


(PC)+» (RO) 


rCMP FIRST WORD TO 12737 


1 339 


010412 


012737 






MOV 


( PC) + » 9 C PC ) + 




1 340 


010414 


001020 






BNE 


6$ 


fBR IF NOT SAME 


1341 


f>l04l6 


023760 


001226 000002 




CMP 


TSTNO, 2CR0) 


jDOrS TSTNO MATCH? 


1342 


010424 


001014 






BN£ 


6$ 


jBR IF NO 


1343 


010426 


022760 


001226 000004 




CMp 


»TSTN0,4(R0) 


>I5 LAST WORD OK? 


1344 


010434 


OOlOlO 






BNE 


68 


(BR IF NO 


1 345 


010436 


010037 


001214 




MOV 


BO#RETURN 


(IT IS A LEGAL TEST SO DO IT 


1346 


01 0442 


1 04402 


005755 




TYPE 


, MR 




1 347 


01 0446 


042737 


000002 001336 




BIG 


ISWOlfSTFTSM 




1348 


010454 


000412 






BR 


88 




1 349 


010456 


005720 




6SI 


TST 


tRO) + 


(POP RO 


1350 


010460 


020027 


026010 




CMp 


B0»ITLAST+10 


(AT END YET? 


1351 


010464 


001351 






BNE 


58 


(BR IF NO 


1352 


01 0466 


104402 


005666 




TYPE 


,MQM 


(YES ILLEGAL TEST NO. 


1353 


010472 


000730 






BR 


48 


(TRY AGAIN 


1 354 
















1355 


010474 


012737 


012320 001214 


781 


MOV 


ITSTI, RETURN 


(PREPARE RETURN ADDRESS 


1356 


010502 


01 3701 


001404 


681 


MOV 


DMCSRfRl 


(Rl s BASE DMCll ADDRESS 


1357 


01O506 


000177 


170502 




JMp 


^RETURN 


(GO START TESTING, 


1359 
















1359 
















1360 










^ROUTINE USED TO "AUTO 


SIZE" THE DMCll 


1361 










|CSP AND VECTOP, 




1362 










f NQTEi 


THE CSR MAY BE 


ANY WHERE IN THE FLOATING 


1 363 












ADDRESS RANGE 


(1600001164000) 


1 364 










1 


AND THE VECTOR 


MAY BE ANY WHERE IN THE 


1 365 












FLOATING VECTOR RANGE t300l7?0) 


1366 










1 






1367 
















1368 


010512 






AUTO.SIZEl 






1369 


01 051? 


000005 






RESET 




(INSURE A BUS INIT. 


1370 


010514 


012702 


001500 


CSRMAPl 


MOV 


iDM,HAP,R2 


(LOAD MAP POINTER, 


1 371 


010520 


0O5022 




181 


CLR 


tB2) + 


(ZERO ENTIRE MAP 


1 372 


O10522 


022702 


001700 




CMP 


iDM,ENDfR2 


(ALL DONE? 


1 373 


01 0526 


001374 






BNE 


1$ 


(BR IF NO 


1374 


010530 


005037 


OOUiO 




CLR 


DMNUM 


(SET OCTAL NUMBER OF DMCll 'S 


1375 


010S34 


012702 


001500 




MOV 


|DM,MAP,R3 


(R2 POINTS TO DMC MAP 


1376 


010540 


005037 


001306 




CLR 


DMACTV 


(CLEAR ACTIVE 


1377 


010544 


032737 


000001 001236 




BIT 


f SW00,5TPTSW 


(QUESTIONS? 


1378 


010552 


001002 






BNE 


• +6 


(BR IF YES 


1379 


010554 


000137 


011252 




JMP 


7» 


(IF NO SKIP QUESTIONS 


1 380 


010560 


012737 


OOOOOi 001256 




HOY 


llf TEMPS 


(START WITH 1 


1 3P1 


010566 


104403 






INSTB 






1382 


010570 


006450 






»4UM 








HACYll 


30(10463 
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, ETC) 


1383 


010572 


104405 






PARAM 






1 384 


010571 


000001 






1 






t 385 


010576 


000020 






16, 






1386 


010600 


001252 






TEMPS 






1387 


010602 


000 






.BYTE 







1386 


010603 


001 






.BYTE 


I 




1 389 


010604 


013737 


001252 001310 




MOV 


TEMP3#DMNUM 


(DMNUM a HOW MANY 


1390 


010612 


104402 


005672 


1281 


TYPE 


,hcrlf 


(TYPE WHICH DMC IS BEING DONE 


1391 


01^616 


104410 






CONVRT 




1392 


010620 


012002 






WHICH 




ITEMP5 IS WHICH DMC 


1 393 


010622 


005237 


001256 




INC 


TEMPS 




1394 


010626 


104403 






INSTR 






1395 


010630 


006510 






CSR 






1 396 


01 0632 


104405 






PARAM 






1397 


010634 


160000 






160000 






1 ■»<)« 




1*^4000 






164000 






1399 


010640 


001254 






TEMP4 






1400 


010642 


000 






.BYTE 







1 401 


010643 


001 






.BYTE 


I 




1402 


010644 


013722 


0012S4 




MOV 


TEMP4,(B2)t 


(STORE CSR IN HAP 


J 403 


010650 


104403 






INSTR 






1404 


010652 


006526 






VEC 






1405 


010654 


104405 






PARAM 






1406 


0106S6 


nooooo 













1407 


010660 


000776 






776 






140e 


010662 


001254 






TEMP4 






1409 


010664 


000 






.BYTE 







1410 


010665 


001 






.BYTE 


1 




14U 


010666 


013712 


001254 




MOV 


TEMP4r(R2) 


(STORE VECTOR IN MAP 


1412 


O10672 


104402 




108t 


TYPE 






1413 


010674 


006547 






PRID 




(ASK WHAT BR LEVEL 


1414 


010676 


D04737 


012266 




JSR 


PCINTTY 


(GET RESPONSE 


1415 


010702 


022703 


000024 




CMP 


l24rR3 


I 


1416 


010706 


101014 






BHI 


508 


(BR IF LESS THAN 4 


1417 


010710 


022703 


000027 




CMP 


»27rR3 


1 


141B 


010714 


103411 






BLO 


508 


(BR IF GREATER THAN 7 


1419 


010716 


012704 


oooou 




MOV 


lltrR4 


(R4 ■ NUMBER OF SHIFTS 


1420 


010722 


006303 






ASL 


R3 


(SHIFT R3 LEFT 


1421 


010724 


005304 






DEC 


R4 


(DEC SHIFT COUNT 


1422 


010726 


001375 






BN£ 


.-4 


(BR IF NOT DONE 


1423 


010730 


042703 


170777 




BIC 


1170777, R3 


(BIC UNWANTED BITS 


1424 


0107 34 


050312 






BIS 


R3rtR2) 


(PUT BR LEVEL IN STATUS HAP 


1425 


010736 


000403 






BR 


88 


(CONTINUE 


1426 


010740 


104402 




SOtI 


TYPE 






1427 


010742 


005666 






HQM 




(RESPONSE IS OUT OF LIMITS 


1428 


010744 


000752 






BR 


108 


(TRY AGAIN 


H29 


010746 


104402 






TYPE 






1430 


010750 


006606 






CRAM 




(DOES DMC HAVi: CRAM? 


1431 


010752 


004737 


013266 




JSR 


PCINTTY 


(GET REPLY 


1432 


010756 


022703 


000131 




CMP 


«l3t,R3 




1433 


010762 


001427 






BEQ 


98 


(YES 


1 434 


010764 


022703 


000116 




CMP 


•116? R3 


INO 


1135 


010770 


001403 






BEQ 


408 


(NOT A Y OR N 


14 36 


010772 


104402 






TYPE 






1437 


010774 


005666 






MOM 




(TYPE »?" 


f ,1 1 3 


f^l 07 7St 








PR 




•ASf AGAIN 
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14 39 


01 1 oo 


1 04402 




40S 1 


TYPE 








1 1 OO 2 


007 340 






SPEED 




ji/r'Srii^^l^ tin Urlwii^Mjwi 




1 1 4 




012266 




JSp 


PC# INTTY 




i 4 




022^03 






CMp 


# 1 22* R3 


1 I S IT R 


14 4 3 


01 1" 14 


0^1 414 






8EQ 


16$ 


; BH IF REMOTE 




011016 


22 7 3 


000114 




C^P 


# 114f R3 


1 IS IT L 


1 445 




1 4 3 






beq 


41 S 


;BR IF LOCAL 




■ " ' ~4 








TYPE 






1 4d7 


^1 1 *^9A 
n 1 i^\n 


005OOO 






MQM 






1 448 




000763 






BR 


40t 




14 49 




U 3 * r □ £ 


000009 nonoQii 


4 1 $ t 


Bis 


tBITli4CR23 






1 £ -1 


M n £ i") ? 

U y y y £ 






SR 


169 


tCONTINUE 


1451 


01 1042 


U52712 


1 OOOftO 


9$ 1 


Bis 


tBiTlSf (R2) 


1 SET BIT 1*5 TV rR&M 


1452 


01 1 C46 


1 04402 




1681 


TYPE 






J 4c; 3 




00670 4 






MODU 




1 ASK WHICH LINE UNIT 




01 lo52 


004737 


ni 




JSR 


PC^ INTTY 


iGET REPT.V 


1 455 


Oil 056 


022703 


000021 




CMp 


#21 t R3 


I " I " 


1456 




001417 






BEG 


30$ 




1457 


01 1 Q64 


022703 


000022 




CMP 


l22rR3 


f "2" 


1456 


01 1 070 


001412 






BEQ 


31S 




1459 


01 lo72 


022703 


000116 




CMp 


ilt6rP3 


J <«N" 


1 460 


01 1 7 6 


001403 






BEQ 


32$ 




1461 


Oil 100 


104402 






TYPE 






1462 


1 1 1 02 


005666 






MOM 




1 IF NOT A lf2 OR N TYPE "7" 


1463 




00076 






BR 


16$ 


fTRY AGIAN 


1 464 


01 1 1 06 


052722 


010000 


32*1 


BIS 


|BIT12r (R2}f 


1 SET BIT 12 IN STAT2 IF NO LU 


1 465 




022222 






CMp 


(R2Hr CR2)^ 


J POP OVER STAT2 AND STAT3 


1466 


1 1 1 1 4 


000447 






BR 


33$ 




1467 




052712 


020000 


3111 


BIS 


#BITl3f (R2) 


1 SET BIT 11 TM STaT7 TS* Mfi909 


t 4&0 


nil ^ 5 2 


1 o44f)2 




30$t 


TYPE 






1469 


011124 


007 1 14 






CONN 








^ 


004737 


01 




JSR 


PC» INTTY 


(GET RFPT.Y 


1471 


ni 1 \fi 


022703 


0001 3 1 




CMp 


il3l#R3- 


t Y 






1 4 6 








17$ 




1 411 


01140 




0001 1 A 




CMp 


# 1 16 « R3 




1474 


011144 


n n 1 A n A 
y y 1 <c V Q 






BEQ 


18$ 




1475 


011146 


104402 






TYPE 






1476 


011150 


005666 






MQM 




flF NOT y OR N TYPE »?" 


1477 


1 1 1 5 2 


000763 






BR 


30$ 


» Tft V T M 


1478 




052722 


O400O0 


171 1 


BIS 




tTimMApniiNn t< f*nMiuiPrTFn 




1 1 1 6 








BR 






1480 


1 1 162 


042722 


040000 


1 8 S t 


BIC 




1 ftu i UAnAnuunu 


1 48 1 


Oil 166 






19(1 








1482 


01 I166 


104403 






IK5TR 






1 48 3 


011170 


007016 






LINE 






1494 


01117 2 


1 04405 






PARAM 






1465 


011174 


000000 













1486 


011176 


000377 






377 






1 487 


01 1200 


001254 






TEMP4 






i4BS 


011202 


000 






sBYTE 







1469 


011?03 


001 






.BYTE 


1 




1490 


011204 


113722 


001254 




MOVB 


TEHP4,CR2)+ 


1 STORE SWITCH PAC IN HAP 


1491 


011210 


104403 






INSTR 






1 492 


011212 


007054 






BM 






1493 


011214 


104405 






PARAM 






1 494 


011216 


000000 
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1495 


011220 


000377 








377 








1 496 


0U222 


001254 








TEHP4 








1497 


011224 


000 








.BYTE 









1498 


011225 


001 








.BYTE 


1 






1499 


011226 


113722 


001254 






MOVB 


TEMP4f CR2)+ 


(STORE SWITCH PAC IN MAP 




150O 


011232 


005722 








TST 


CB2) + 


POP OVER STAT3 




1501 


011234 


005337 


001252 




33$t 


DEC 


TEHP3 


DEC DMC COUNT 




1502 


011240 


001402 








BEQ 


34$ 


BR IF DONE 




J 503 


011242 




010612 






JMp 


121 


JUMP IF NOT 




, 1504 


011246 


000137 


011702 




34$| 


JMp 


13t 


(CONTINUE 




1505 


011252 


012701 


160000 




7$l 


HOV 


#160000rRl 


SET FOR FIRST ADDRESS TO BE TESTED 


1506 


. 011256 


012737 


011774 


000004 




MOV 


«6$,9«4 


SET FOR NON-EXISTANT DEVICE TIME 


OUT 


1507 


011264 


005011 






2$l 


CLR 


CRD 


CLEAR 5EL0 




1508 


011266 


005711 








TST 


(Rl) 


IF DMCU DMCSR S/B 




1509 


011270 


001172 








BN£ 


J$ 


IF NO DEV 1 TRAP TO 4, IF NO BIT 


8 THEN 


1510 


011272 


005061 


000006 






CLR 


6CR1) 


CLEAR SEL6 




1511 


011276 


005761 


000006 






TST 


6(Ri) 


IF DMCU THEN DHRIC S/B aOl 




1512 


011302 


001165 








BNE 


3$ 


BR IF NOT DMCM 




1513 


011304 


012711 


002000 






MOV 


fBlTlOiCRl) 


SET ROMO 




1514 


011310 


005061 


000004 






CLR 


4(Rl) 


CLEAR SEL4 




1515 


011314 


012761 


125252 


000006 




MOV 


1125252, 6(R1} 


WRITE THIS TO SEL6 




1516 


011322 


052711 


020000 






BIS 


#BlTl3iCRl) 


WRITE ITi 




1517 


011326 


022761 


125252 


000004 




CMp 


ll2S252,4CRn 


WAS IT WRITTEN? 




151S 


011334 


001004 








BNE 


21$ 


IF NO IT IS NOT CRAM 




1519 


011336 


052762 


100000 


000002 




BIS 


#BiTl3,2CR23 


SET BXTiS IF C!?AH 




1520 


011344 


000431 








BR 


22$ 






1521 


011346 


012711 


001000 




21$l 


MOV 


«BIT9,CRn 


SET ROMI 




1522 


011352 


012761 


100417 


000006 




NOV 


1100417, 6CR1) 


rPUT INSTRUCTION IN 5EL6 




1523 


OII36O 


012711 


001400 






MOV 


«BIT91BIT8,CR1) 


(CLOCK INSTRUCTION (MICRO PROC PC 


TO 0) 


JS24 


011364 


012711 


002000 






MOV 


iBlTlOfCRl) 


rSET ROMO 




1525 


011370 


022761 


000626 


000006 




CMP 


1626, 6CR1) 


IS IT LOCAL CROM 




1526 


011376 


001411 








BEQ 


23$ 


BR IF YES 




1527 


OII4OO 


022761 


016520 


000006 




CMp 


116520, 6(R1} 


(IS It REMOTE CROM? 




1528 


011406 


001410 








BEQ 


22$ 


BR IF YES 




1529 


011410 


022761 


177777 


000006 




CMP 


I-1,6CR1) 


(NO CROMT 




1530 


011416 


001404 








BEQ 


22$ 


BR IF YES 




1531 


011420 


000516 








BR 


3$ 


NOT A DMC 




1532 


011422 


052762 


000002 


000006 


23$l 


BIS 


IBIT1,6CR2) 


rSET BIT 1 IN STAT3 




1533 










lAT 


THIS POINT 


IT IS ASSUMED THAT Rl HOLDS A DMCll CSR ADDRESS, 




1514 


011430 


010122 






c«S i 






• TQ5ff «fi9 Tjj C0P,E TABLE B 




■ 1535 


U.1U32 


012711 


001000 




I5$t 


HOV 


iBlT9,(Rl) 


CLEAR LINEUNIT LOOP 




1536 


0U436 


005061 


000004 






CLR 


4(R1) 


CLEAR P0RT4 




1537 


01U42 


012761 


123113 


000006 




HOV 


#122113, 6(Rl} 


LOAD INSTRUCTION (CLR DTR) 




1538 


011450 


052711 


000400 






BIS 


|BITe,CRl) 


CLOCK INSTRUCTION 




1539 


011454 


012761 


021264 


000006 




HOV 


#021264, 6CR1) 


LOAD INSTRUCTION 




1540 


011462 


052711 


000400 






BIS 


IBIT6,CR1) 


CLOCK INSTRUCTION 




1541 


011466 


122761 


000377 


000004 




CHpB 


#J77,4tRl) 


IS IT ALL 0NES7 




1542 


011474 


001003 








BNE 


,+io 


BR IF SO 




1543 


011476 


052712 


010000 






BIS 


fBIT12,CR3} 


IF YES, NO LINE UNIT, SET STATUS 


BIT 


1544 


011502 


000436 








BR 


20$ 






1545 


011504 


032761 


000002 


000004 




BIT 


iBITl,4CRl} 


IS SWITCH A 0NE7 




1546 


OII5I2 


001403 








BEQ 


• ♦10 


BR IF M8201 




1547 


011514 


052712 


060000 






BIS 


*BlT13iBIT14,(P2 


1 |MB202 ASSUME CONNECTOR 




1548 


011520 


000427 








BR 


30$ 


CONNECTOR ON) 




1549 


011522 


032761 


000010 


000004 




BIT 


iBIT3,4(Rl} 


IS MRDY SET 




1550 


011530 


001023 








BNE 


30$ 


BR IF M8201 NO CONNECTOR (ON LINE) 



NO DMCl 
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1551 


0115 32 


0127 61 


00 0100 


000004 








• i.n a n on d t a 

I U\JPiU rUnl4 


1552 


01 1540 


012761 


122113 


0Q0006 




* 






1553 


01 1546 


052711 


000400 






bis 


§ol la 1 (HI } 




1554 


01 1552 


1 2761 


021264 


000006 




MOV 




JbUPD INoTPl'CTlUN 


1555 


011560 


05271 1 


000400 






BIS 




fLbCiC'^ INSTHUCTION I Ht AU nLiUtP; K&VjJ 


1 5S>> 


011564 


032761 


000010 


000004 




BIT 


fBiTj»4lHl J 


{IS MRDY SET NOrt? 


1557 


01 1572 


00140 2 








BEQ 




• no T s" n(\ muiuirr"rno 

(Dn if !»U (.UnNCiWlUn 


1559 


Ot 1574 


05271 2 


040000 










J Ob J, OiniUo Oil rUK vUnNbV,iWf% 


1559 


01 1 600 


005722 






208 t 


TC 






1 5b0 


011602 


012761 


021324 


n A A 










1 561 


011610 


012711 


001400 






MO 


ItnTTOIUTTB.fDI \ 


* DdDT A T.!I 1 K 


1562 


0U614 


1561 22 


000004 






oXSB 


iir.! } t \ r d jr 




I 563 


011620 


012761 


021344 


000006 










1 56 4 


Ot 1626 


012711 


00 1 *UU 






MOV 




iCLOCK INSTRt 


1 565 


011632 


156122 


A A A A A A 

U U 4 






BI SB 


Attn 1 . 


tSTDRK RMa71 ADD TN TABLE 


1566 


011636 


005722 










(P2)t 


; pop OVER STAT3 


1567 


011640 


OOSO 1 1 








CLR 


C Rl) 




1 568 


01 1642 


0052 37 


001 310 






INC 


DMNUM 


} UPDATE DEVICE COUNTER 


1 ■ife9 


0116^6 


0227 37 


AAA AOrt 


001 310 






I20f DMNUM 


|ARE MAX, NO, OF DEV FOUND? 


15 


01 1654 


001412 








BEQ 


138 


|YE3 DON'T LOOK FOR ANY MORE, 


157 ! 


01 1656 


00501 1 






1* 






tri.FiP BTT 1 A 
^\<uE>An Oil IK} 


1572 


011660 


005 06 1 


A A A AAA 






CLR 


6 ( Rl ) 


iCLEAR SEL 6 


1 573 


01 1664 


O6270 1 


0000 i 




1 4S t 






fUPnfiTF TAP pnTNTi^n address 


1574 


011670 


n 1 1 A 1 

OZi701 


1 & A A A A 






CMP 


# 164000* Rl 




1575 


01 1674 


n A 4 A A 

001402 










1 3 $ 




1576 


01 1676 


0001 37 


011264 






JMP 


28 


t.TMMD TC MHT 


1 577 


011702 


005037 


001306 




13ft 


CLR 


DMACTV 




15 79 


01 1 706 


005737 


00131 






T5T 


DMNUM 




1579 


011712 


001423 








BEQ 


58 


tERROB ATlTn <T7FR FDIIND NO Duf^ll'S TN 


1580 


011714 


01 3701 


001 310 






MOV 






1581 


Ot 1720 


010137 


001314 






MDV 


nl»5«*»NUH 




1582 


011724 


000241 






4St 


CLC 






158 3 


01 1726 


0061 37 


001 306 








DMACTV 




1584 


0U732 


005237 


00 i 3-06 








DMACTV 


J OCi i inEi DA A 


1585 


011736 


005 30 1 








DPr 
utt 


^* 




1586 


011740 


001 37 1 










41 


• RR TIT MriDir TD RPNPB&TF 


1587 


011742 


0127 37 


000006 


000004 




MOV 


#6 f 91 4 


*&P«TnQ!r TRAD VRTTHR 




011750 




001 306 


001 312 




MOV 


DMACTVfSAVACT 


;SAVE ACTIVE REGISTER 


1 5R 9 




000137 


1 20 1 






JMP 


VECMAP 


|G0 FIND THE VECTOR NOW, 


15*^0 


011762 


104402 


005760 




5$f 


TYPE 


,MERR2 


^NOTIFY OPR THAT NO DMCll*S FOUND, 


1591 


011766 


005000 








CLP 


RO 


jMAKE DATA LIGHTS ZERO 


1592 


011770 


000000 








HALT 




fSTOP THE SHOwl 


1593 


011772 


000776 








BP 


•-a 


jDISABLE CONT, SW , 


1594 


0117 7 4 


012716 


011664 




6S| 


MOV 


1148, CSP) 


, ENTERED BY NON-EXISTANT TIME-OUT, 


1595 


012000 


000002 








RTI 




IRETURN TO MAINSTREAM 


1596 



















1597 


017002 


000001 






WHICHI 


1 






1598 


012004 


002 


002 






.BYTE 


2,2 




1599 


01200b 


001256 








TEMPS 






1600 


















1601 


01 2010 


032737 


000001 


001236 


VECMAPl 


BIT 


#SW00,STRT8W 




1602 


012016 


001114 








BNE 


58 




1603 


012020 


0J2737 


000340 


000022 




MOV 


1340, »»22 


tSET lOT TRAP PRIO TO 7 


1604 


012026 


012737 


012202 


000020 




MOV 


i4l,»f20 


ySET lOT TRAP VECTOR 


1^05 


012034 


012702 


001500 






MOV 


iDM,MAp,R2 


»SET SOFTWARE POINTER 


1606 


012040 


012700 


000300 






MOV 


«300,R0 


IFLOATING VECTORS START 
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1607 
1608 
1609 
1610 
1611 
1612 
161 3 
1614 
1615 
1616 
1017 
1618 
1619 
1620 
1621 
1622 
1623 
1624 
1625 
1626 
1627 
1628 
1629 
1630 
1631 
1632 
1633 
1634 
1635 
1636 
1637 
1638 
1639 
1640 
1641 
1642 
1643 
1644 
1645 
1646 
1647 
1648 
1649 
1 650 
1551 
1652 
1613 
1654 
1655 
1656 
1657 
1659 
1659 
1660 
1661 
1662 



012044 
012050 
012052 
01 2056 
012060 
012064 
012066 
01 2074 
012100 
012102 
012106 
0121 J4 
012116 
1 2 1 2 4 
012130 
0121 36 
012142 
012144 
012146 
012152 
012154 
012162 
012164 
012172 
012174 
012200 
012202 
012206 
012214 
012220 
012222 
012224 
012226 
012230 
012234 
012240 
012242 
01 2246 
012250 

012252 
012254 
012256 
012260 
012262 
012264 



012266 
012272 
012274 

012300 
O12304 
012 106 
01 2?12 



012701 
010120 
012721 
022021 
020127 
101771 
013737 
006037 
103063 
012704 
016437 
011201 
012761 
012711 
012761 
012711 
105200 
001376 
162704 
001404 
016437 
000767 
052762 
005011 
062702 
000735 
051662 
042762 
016405 
006305 
006305 
006305 
006305 
042705 
050562 
022626 
012716 
000002 
000207 

000000 
000000 
000200 
000240 
000300 
000340 



000004 



001306 
001246 

000012 
012252 

000200 
001000 
121U1 
001400 



000002 

012252 

005300 

000010 

000002 
000007 
012254 



170777 
000002 



012172 



001246 

177776 
000004 
000006 



177776 
000002 



68t 

381 



BRLVLI 



MOV 

MOV 

MOV 

CMP 

CMP 

BL08 

MOV 

ROR 

BCC 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

INCB 

BNE 

SUB 

BEQ 

MOV 

BR 

BIS 

CLR 

ADD 

BR 

BIS 

BIC 

MOV 

A8L 

ASL 

ASL 

ASL 

BIC 

BIS 

CMP 

MOV 

RTI 

RTS 




200 
240 
300 
340 



1302, Rl 

Rl#CRO)+ 

|4,CR1)+ 

CR0)+,(R1)+ 

Rl, 11000 

18 

DMACTV, TEMPI 

TEMPI 

58 

112, R4 

BRLVL(P4),PS 

(R2),R1 

1200, 4CR1) 

• BIT9,CRn 

1121111, 6CR1) 

»BIT91BIT8,CRn 

RO 

.-2 

#2,R4 

68 

BRLVL(R4),PS 
78 

»5300,2CR2) 
CRD 
110, R2 
2t 

(5P),2(R2) 

t7,2CR2) 

BRl>VL<l>2CR4},RS 

B5 

R5 

R5 

R5 

#170777, R5 
R5,2(R25 
t8P)+,(SP)+ 
«38,(8P) 

PC 



f LEVEL 

I LEVEL 

t LEVEL 4 

1 LEVEL 5 

f LEVEL 6 

t LEVEL 7 



I PC OF lOT INSTR, 

T START FILLING VECTOR AREA 

I WITH , + 2 1 lOT 

I ADO 2 TO RO +R1 

I BR IF MORE TO FILL 
, STORE TEMPORALLY 
IBRING OUT A BIT 
yBR IF ALL DONE 
rR4 IS INDEX REGISTER 
I SET P8 TO 7 



I SET ROMI 

tPUT INSTRUCTION IN PORT* 
I FORCE AH INTERRUPT 
I STALL 

fFOR TIME TO INTERUPT 
yGET NEXT LOWEST PS LEVEL 
jBR IF R4 » 

fMOVE NEXT LOWER LEVEL IN PS 
fBR TO DELAY 

}N0 INTERUPT ASSUME 300 AT LEVEL 5 AND FIX DMCU 

» CLEAR ROMI 

yPOP SOFTWARE POINTER 

rKEEP GOING 

IGET VECTOR ADDRESS 

iCLEAR JUNK 

|GET BR LEVEL OF DMCll 
» SHIFT LEVEL 4 PLACES 
»T0 THE LEFT FOR THE 
r STATUS TABLE 

fCLEAR UNWANTED BITS 

}PUT BR LEVEL IN STATUS TABLE . 

I POP lOT JUNK OFF STACK 

J SET FOR RETURN 



I ALL DONE WITH "AUTO SIZING" 



105777 


166712 


INTTYl TSTB 


?TKCSR 


rWAIT FOR DONE 


100375 




BPL 


• •4 


017703 


166706 


HOV 


gTKDBR,P3 


IPUT CHAR IN P3 


105777 


166704 


TSTB 


iTPCSP 


JWAIT UNTIL PRI^TER X5 PEADY 


100375 




BPL 




010377 


H67QQ 


MOV 


R3f iTPDBP 


(ECHO CHAP 


U42703 


C-00240 


BIC 


»BIT71BIT5.»3 


(MASK Orr LOWER CASE 






PT5 




?PETUPN 
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1663 






1664 






1665 






16f^6 






1667 






1668 






166 9 






1670 






1671 






1672 






167 3 






1674 






1 675 


012320 


1 27 37 


1 676 


012326 


012737 


1677 






1678 


012334 


005077 


lft79 


012340 


012702 


1680 


012344 


1 04414 


1681 


12346 


02 1 224 


1682 


012350 


016104 


1663 


012354 


042704 


1 684 


OI236O 


012705 


I6«i5 


012364 


1 20504 


16R6 


012366 


001401 


1687 


012370 


1 04002 


1688 


012372 


104400 


1689 






1690 






1691 






1692 






J693 






16Q4 






1695 






1696 






1697 






169» 






1699 


012374 


012737 


1700 


012402 


012737 


1701 






1702 


012410 


01 2702 


1703 


01J414 


104414 


1704 


012416 


021244 


1705 


01 2420 


01 6104 


1706 


012424 


042704 


1707 


012430 


005005 


1708 


012432 


1 20504 


1709 


012434 


001401 


1710 


01243b 


104002 


1"? n 


01 244(1 


104400 


1712 






1713 






17H 






1715 






1716 






1717 






1?!B 







167044 
000011 



000004 
000054 
000020 



000004 
000017 



}««#«#««*«*«««»«»^»tt«»«««««» TEST 1 *««*«#*««*•»«-****«*«««'««*«■« 

j*OUT CONTPDL REGISTER PEAD/ONLY TEST 

••DO A MASTER CLEAR, VERIFY THAT ALL READ/ONLY 

|«BITS APE IN THE CORPECT STATE 

1 I #«#«»♦♦#»#*##*#*#####»•♦#«#####♦#»#♦##•*###♦###♦##**#«#•#*»## 

• TEST 1 



MOV 
MOV 



•liTSTNO 
tTST2»NEXT 



CLR 9DMCSR 
MOV #11»R2 
ROHCLK 

02l004i<20*n> 



MQV 

BIG 

MOV 

CMpB 

BEQ 

HLT 

SCOPE 



4CR1),R4 
154, R4 
120, R5 
R5,R4 
IS 
2 



|R1 CONTAINS BASE DMCll ADDRESS 

jCLCAP SELO 

»SAVE R2 FOR TYPEOUT 

;NEXT WORD IS INSTRUCTION, RO«CLK PC«5304 

»P0RT4,LINE UNIT REG U 

IPUT "FOUND" IN R4 

fCLEAR UNKNOWN BITS 

(PUT "EXPECTED" IN R5 

fiS OUT READY SET? 

J BR IF YES 

I ERROR IN LU 11 

I SCOPE THIS TEST 



p »««»«*•*«**««»•««««««»««•«#* TEST 2 ##««««*«•***«**»«*««««««»«» 

;»IN CONTROL REGISTER READ/ONLY TEST 

|#00 A MASTER CLEAR, VERIFY THAT ALL READ/ONLY 

J*BITS ARE IN THE CORRECT STATE 

t I ***«•**««**«*******«*«*#*«#*»«#**«**«*«««*«**»#*««#»«««*««««« 

; TEST 2 

, .............. 

MOV I2»TSTN0 
HOV #TST3,NEXT 



MOV #12, R2 
ROMCLK 

0210041<20*12> 

MOV 4(R1),P4 

BIC I17#R4 

CLR R5 

CMPB R5,R4 

BEQ II 

HLT 2 
SCOPE 



}R1 CONTAINS BASE DMCll ADDRESS 
;SAVE R2 FOR TYPEOUT 

fNEXT WORD IS INSTRUCTION, ROMCLK PCb5304 

IPQRX4.LINE UNIT REG 12 

|PUT "FOUND" IN R4 

fCLEAR UNKNOWN BITS 

I PUT "EXPECTED" IN R5 

rARE ALL BITS CLEARED? 

rBR IF YES 

jERROR IN LU 12 
i SCOPE THIS 'TEST 



;«»«»**«*«»*«*««•*«*•««*«*** TEST 3 

(♦MODEM CONTROL REGISTER READ/ONLY TEST 

l#DO A MASTER CLEAR, VERIFY THAT ALL READ/ONLY 

|#aiT5 ARE IN THE CORRECT STATE 

J t »»»««***««*«»**»#«*#*««««*####*«*»•«««**«•«•«*****•««««#«««•« 
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14118 


1719 








1720 








1721 








1722 


012442 


012737 


000003 


1723 


012450 


012737 


012514 


1724 








1725 


012456 


104412 




1726 


012460 


012702 


000013 


1727 


01246 4 


104414 




1728 


012466 


021264 




1729 


012470 


016104 


000004 


1730 


012474 


042704 


000213 


1731 


012500 


012705 


000100 


1732 


012504 


120504 




1733 


012506 


001401 




1734 


012510 


104002 




1735 


012512 


104400 




1736 








1737 








1738 








1739 








1740 








1741 








1742 








1743 








1744 








1745 








1746 


012514 


012737 


000004 


1747 


012522 


012737 


012616 


1748 








1749 


012530 


104412 




1750 


012532 


012702 


OOOOi? 


1751 


012536 


104414 




1752 


012540 


U21364 




1753 


012542 


016104 


000004 


1754 


012546 


042704 


000206 


1755 


012552 


012705 


000051 


1756 




03273? 


020000 


1757 


012564 


001004 




1758 


012566 


032737 


040000 


1759 


012574 


001004 




1760 


012576 


042704 


000040 


1761 


012602 


042705 


000040 


1762 


012606 






1763 


012606 


120504 




1764 


012610 


001401 




1765 


012612 


104002 




1766 


012614 


104400 




1767 








1766 








1769 








1770 








1771 








1772 








1773 








1 774 
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TST3I 



TST4t 



2St 
3tt 



I T 
I— • 

HOV 
MOV 



»3,TSTN0 
iTST4,NEXT 



MSTCtP 

MOV 113, R2 

ROMCLK 

0210041<20*13> 



MOV 

BIC 

MOV 

CMpB 

BEQ 

HLT 

SCOPE 



4tRnfR4 

t213,R4 

ilOOrRS 

R5,R4 

U 

3 



}R1 CONTAINS BASE DMCU ADDRESS 
) MASTER CLEAR DKCii 
»5AVE R2 FOP TYPEOUT 

INEXT WORD IS INSTRUCTION, ROMCLK PO5304 
»P0RT4»LINE UNIT REG 13 
JPUT "FOUND" IN R4 
ICLEAR UNKNOWN BITS 
J PUT "EXPECTED" IN R5 

fARE RING, DTR, AND MODEM READY SET? 

fBR IF YES 

» ERROR IN LU 13 

(SCOPE THIS TEST 



(*«««**»««««#«««»««««.*«##**# TEST 4 ###*####♦»#♦###«###»####### 

y*MAINTENANCE REGISTER READ /ONLY TEST 

f»DO A MASTER CLEAR, VERIFY THAT ALL PEAO/QKLY 

»*S1TS ARE IN THE CORRECT STATE 

f t *•**«**««««***♦««•«*«•***«*«««•«*«*«*•**»««*««**##*•«#««*«*«• 



f TEST 4 




MOV 


I4,TSTN0 




MOV 


tTST5,NEXT 








fRl CONTAINS BASE DMCll ADDRESS 


MSTCLR 




(MASTER CLEAR DMCll 


HOV 


il7#R2 


(SAVE R2 FOR TYPEOUT 


ROMCLK 




(NEXT WORD IS INSTRUCTION, ROMCLK PCsS304 


021004 


1<20#17> 


(P0PT4^LINE UNIT REG 17 


MOV 


4CR1),R4 


(PUT "FOUND" IN R4 


BIC 


»306,R4 


(CLEAR UNKNOWN BITS 


MOV 


151, R5 


;PUT "EXPECTED" IN R5 




*5 xTi, 3 f STATi 


(15 LU An nd202 Or MhzOit 


BNE 


21 


)BR IF Me202 


BIT 


»BIT14f8TATl 


(CONNECTOR??? 


BNE 


31 


. jBR IF M820i WITH CONNECTOR 


BIC 


«40«R4 


»MASK OFF SI BIT IF M8202 OR HB201, NO CONNECTOR 


BIC 


|BIT5,R5 


(SI BIT IS UNKNOWN 


CMpB 


H5,R4 


»ARE SI AND ICIR SET? 


BEQ 


It 


(BR IF YES 


HLT 


3 


(ERROR IN LU 17 


SCOPE 




(SCOPE THIS TEST 








|*LINE 


UNIT REGISTER 


NRITE/READ TEST 



|»SET BITS IN LU REGISTER 12, VERIFY IT IS SET 
(»CLEAR BITS IN LU REGISTER 12, VERIFY IT 15 CLEAR 
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1775 












I TEST 


5 






{776 




















1777 


(H 261b 


012737 


000005 


001226 


TST5t 


MOV 


#5#TSTN0 






17?« 


012621 


012737 


012756 


001216 




MOV 


»TST6»Nt;XT 






1779 


01 2632 


01 2737 


012646 


001220 




MOV 


#1S,L0CK 






pen 
















>P1 CONTAINS BASE D^Cll ADDRESS 


t7fl J 




104412 








MSTCLP 




jl^ASTEB CLEAR DMCll 




1762 


012642 


012702 


000012 






MOV 


912, S(2 


jSAVE REGISTER ADDRESS FOR 


TYPEUUT 


17<33 


Ot 2646 


012761 


0O0040 


000004 


ISI 


MOV 


»40,4tHn 


ILOAD P0RT4 




17^4 


012654 


104414 








ROMCLK 




jNEXT WORD IS INSTRUCTION, 


ROMCLK PC«5304 


!7fl5 


012656 


1221 12 








122112 




»SET B1T5 IN LU-12 




17*>6 


012660 


104414 








ROMCLK 




jNEXT WORD IS INSTRUCTION, 


ROMCLK PCK5304 


1787 


012662 


021245 








021245 




;R£AD LU-12 




1788 


012664 


012705 


000040 






MOV 


#40, R5 


(PUT "EXPECTED" IN R5 




l7Ry 


012670 


116104 


000005 






MOVB 


5CRl)rP4 


|PUT "FOUND" IN R4 




I79n 


012674 


042704 


000337 






BIC 


•337#R4 


iCLEAR UNl^AhfTED BITS 




179! 


012700 


120504 








CMPB 


R5f R4 


lis BITS SET? 




1792 


01 2702 


001 401 








BEQ 


2$ 


fBR IF YES 




1793 


01 2704 


104003 








HLT 


3 


rERROR, BIT 5 IS NOT SET 




1794 


01 2706 


104401 






2tl 


SCOPl 




iSCOPE SUBTEST (SW09«1) 




179'S 


012710 


012737 


012716 


001220 




MDV 


«3SfL0CK 


(NEW SCOPl 




1796 


01271 6 


005061 


000004 




3$} 


CLP 


4(Rn 


(LQAO P0RT4 




1797 


012722 


104414 








ROMCLK 




(NEXT WORD IS INSTRUCTlONi 


ROMCLK PCa5304 


1798 


012724 


122112 








122112 




(CLEAR BIT 5 IN LU-12 




1799 


012726 


104414 








ROHCLK 




(NEXT WORD IS INSTRUCTION, 


ROMCLK PCa5304 


1800 


012730 


021245 








021245 




(READ LU-12 




IflOl 


012732 


005005 








CLR 


R5 


(PUT "EXPECTED" IN R5 




180? 


012734 


116104 


000005 






MOVB 


5(R1)#R4 


(PUT "FOUND" IN R4 




JR03 


0127 40 


042704 


000337 






BIC 


»337f P4 


(CLEAR UNWANTED BITS 




1804 


01 2744 


120504 








CMPB 


R5rP4 


(IS BITS CLEAR? 




1805 


01 2746 


001401 








BEQ 


49 


(BR IF YES 




1P06 


012750 


104003 








HLT 


3 


(ERROR, BITS 15 NOT CLEAR 




1607 


012752 


104401 






4$: 


SCOPl 




(SCOPE SUBTEST (SW09al) 




IflttS 


01 2754 


104400 








SCOPE 




(SCOPE THIS TEST 




1609 




















1810 




















1811 












f TEST 6 


1812 












p*IjIne unit register 


WRITE/READ TEST 




1813 












|#SET BITl IN LU REGISTER 17 » VERIFY IT IS SET 




1814 












|#CLEAR BITl IN LU REGISTER 17# VERIFY IT IS CLEAR 




1815 












II 


1816 




















1817 












) TEST 


6 


























1819 


012756 


012737 


000006 


001226 


TST6I 


MOV 


•6#TSTN0 






1820 


01 2764 


012737 


013116 


001216 




MOV 


#TST7,NEXT 






1821 


012772 


012737 


013006 


001220 




MOV 


fUrLOCK 






1822 
















(Rl CONTAINS BASE DMCll ADDRESS 


1823 


01 moo 


104412 








HSTCLR 




(MASTER CLEAR DMCll 




1824 


013002 


012 ?02 


000017 






MOV 


f 17,P2 


(SAVE REGISTER ADDRESS FOR 


TYPEOUT 


1825 


01 3006 


012761 


000001 


000004 


itt 


MOV 


ii,4(Rn 


(LOAD P0RT4 




1826 


013014 


104414 








ROMCLK 




(NEXT WORD IS INSTRUCTION, 


ROMCLK PCC5304 


1827 


013016 


122117 








122117 




(SET BITl IN LU-17 




1828 


013020 


10441 4 








ROMCLK 




(NEXT WORD TS INSTRUCTION, 


ROMCLK PC=5304 


1829 


01302 2 


021365 








021365 




(READ LU-17 




1 P 3 n 


r>U024 


012705 


OOOOOl 






MOV 


»1#P5 


(PUT "EXPECTED" IN R5 





DZDHE MACYll 30C1046) ll-JUL-77 



DZDMt.PU 12 


-HAY-77 


14(18 


1831 


01 3030 


1 16104 


000005 


1832 


013034 


042704 


000376 


1833 


01 BO^fi 


120504 




1834 


013042 


001 401 




1835 


01 3044 


104003 




1836 


013046 


104401 




1837 


013050 


012737 


013056 


1838 


013056 


005061 


000004 


1839 


01 3062 


104414 




1840 


013064 


122117 




1841 


013066 


104414 




1842 


013070 


021365 




164 i 


01 3072 


005005 




1844 


013074 


116104 


000005 


1 fid's 


01 11 00 


042704 


000376 


1846 


013104 


120504 




1847 


U13106 


001401 




1848 


01 3tlO 


104003 




1849 


013112 


104401 




1850 


013114 


104400 




1851 








1852 








1853 








1954 








1855 








1856 








1857 








1856 








1859 








1860 








1861 


013116 


012737 


000007 


1862 


013124 


012737 


013326 


1863 


013132 


012737 


013152 


1864 








1865 


01 3140 


104412 




1866 


01 3142 


012702 


000013 


1867 


013146 


012700 


OOOOOl 


186? 


013152 






1869 


013152 


010061 


000004 


1870 


013156 


042761 


000257 


1871 


013164 


104414 




1872 


013166 


122113 




187S 


013170 


104414 




1874 


013172 


021265 




187S 


013174 


010005 




1876 


"13176 


043705 


000257 


i^T! 


01 3202 


116104 


000005 


1878 


01 320b 


042704 


000257 


IS 79 


ni 2 


120504 




1880 


013214 


001401 




1881 


132 1 6 


104003 




|8«2 


013220 


104401 






Ui 3222 


000241 






013224 


106100 






at 3226 


001351 




* P a !«; 




yi2^3? 


011244 



11140 PAGE 37 

LINE U^IT WRITE/READ TESTS 



PAGSs 0055 



001220 



2$i 
3tl 



64Sr 



MOVB 


5CR1),R4 


(PUT "FOUND" IN R4 


BIC 


1376, R4 


(CLEAR UNWANTED BITS 


CMpB 


R5,P4 


(IS BITl SET? 


BEQ 


2S 


(BR IF YES 


HLT 


3 


(ERROR, bIT I IS NOT SET 


SCOPl 




(SCOPE SUBTEST (SW09sn 


MOV 


t3l*L0CK 


(NEW SCOPl 


CLR 


4(Rt) 


(LOAD P0RT4 


ROMCLK 




(NEXT WORD IS INSTRUCTION, 


122117 




(CLEAR BIT 1 IN LU-17 


ROMCLK 




(NEXT WORD IS INSTRUCTION, 


021365 




(READ LU-17 


CLR 


P5 


(PUT "EXPECTED" IN R5 


MOVB 


5CR1),R4 


(PUT "FOUND" IN R4 


BIC 


1376, R4 


(CLEAR UNWANTED BITS 


CMPB 




,13 BITl ZLZkTi: 


BEQ 


4t 


(BR IF YES 


HLT 


3 


(ERROR, BITl IS NOT CLEAR 


SCOPl 




(SCOPE SUBTEST (SW09«1) 


SCOPE 




(SCOPE THIS TEST 



(*»«*«««•*«»«*»•««»«**«#»«*« TEST 7 ########*##»»###**»»####*«» 

(•LING UNIT REGISTER WRITE/READ TEST 
(•FLOAT A 1 THROUGH LINE UNIT REGISTER 13 
(•FLOAT A THROUGH LINE UNIT REGISTER 13 

( I «#####»#»#•*###•»♦»##♦*•«»•••»#•##••»•#•••»••••»••»•♦•*••♦•♦* 



( TEST 7 
I— — 

MOV 
MOV 
MOV 



i7,TSTN0 
»TST10,NEXT 
164$, LOCK 



MSTCLR 

MOV 

MOV 



113, P2 
»1,R0 



MOV 
BIC 

ROMCLK 
122100H3 
ROMCLK 

2lOO5i<l3#30> 



R0,4tRl) 
• 257,4(Rn 



MOV 


R0,Ri 


(PUT EXPECTED IN P5 


BIC 


»257,P5 


(CLEAR UNWANTED BITS 


MOVB 


5(RU,R4 


(PUT "FOUND" INTO R4 


BIC 


• 257, S?4 


(CLEAR UNWANTED BITS 


CMpB 


B5f ?4 


(DATA CORRECT? 


BEQ 


65S 


j8R IF YES 


HLT 


3 


(ERROR 


SCOPl 




(SW09«17 


CLC 




(CLEAR CARRY 


POLB 


RO 


(SHIFT BIT IN PO 




641 


(IF R0«0 THE^ DONE 




1167$, LOCK 


?NEW SCOPl 



(Rl CONTAINS BASE DMCll ADDRESS 
(MASTER CLEAR DMCll 
(SAVE REGISTER ADDRESS FOR TYPEOUT 
(START WITH BIT 

(PUT PATTERN INTO P0RT4 
(CLEAR UNWANTED BITS 

(NEXT WORD IS INSTRUCTION, ROMCLK PC«5304 
(MOV DATA TO IBUS REGISTER 13 
(NEXT WORD IS IMSTRUCTIDN, ROMCLK ?Cs5304 
(READ FROM IBUS REGISTER U 



DZDMP 


MACYl 1 


30C1046) 




-MAY-77 


1887 


Ot 3236 


012700 


1 f) 8 


013242 


UU5100 


1889 


13244 




i 890 


013244 


01 0061 


lS9i 


01 325<^ 


042761 


18^2 


i) 1 3256 


104414 


1993 


01326 


122113 


1894 


01 3?62 


104414 


1895 


01 32*4 


021265 


1896 


n 1 3266 


010005 


1897 


! 3 2 ? 


042705 


1 898 


1) 1 3274 


116104 


18 99 


013 300 


042704 


lyoo 


013304 


120504 


1901 


01 33O6 


001401 


19 2 




J 04003 


1 90 3 


] 3312 


104401 


1904 


I 33 1 4 


005100 


1 905 


1 3 3 1 6 


000241 


1906 




106100 


1907 


013322 


001347 


1 908 


013324 


104400 


1909 






1910 






1 9 i 1 






1912 






1913 






1914 






1915 






J916 






1917 






1918 






1919 


013326 


012737 


1920 


013334 


012737 


1921 


013342 


012737 


1922 






1923 


013350 


104412 


1924 


01 3352 


012702 


1925 


01 3356 


I 27 00 


1926 


01 3362 




1927 


01 3362 


010061 


1928 


01 3366 


104414 


1929 


01 3370 


122114 


1930 


01 3372 


104414 


1931 


Ot 3374 


021305 


1932 


013376 


010005 


1933 


013400 


116104 


19 34 


013404 


120504 


1935 


01340ft 


on 1401 


193fr 


013410 


1 04003 


1937 


013412 


104401 


1938 


013414 


000241 


1939 


013416 


106100 


1940 


013420 


00 J 360 


1941 


013422 


012737 


194? 


01 3430 


012700 


DZDWE 


MACYI 1 


30(1046 



ll-JUli-77 11140 PAGE 3<; 
4J18 LINE umT.iii.RITE/READ TESTS 



PAGEI OQS? 



69S! 
(?7S| 



000004 
000257 



00025? 
000005 



MOV 


«1»R0 


jSTART WITH BIT 






COM 


RO 








HOV 


R0,4CPl) 


trUi PATTEH^ INTU rUKi^ 






BIC 


#257#4CPn 








ROHCliK 




• WITYT jnon TO 7 M GTO ttf" T T nM . 


HOMCLK 


PCs5 3 04 


1221001 


13 








ROMCLK 




« iLic^v*P u n ra n tc t iu CfDTl^ T T n M 
JNtAX WuRD IS INbrKJCliUN* 


onM^i it 


PC* 5 304 


210051<13*20> 


■ DlTArs POfMul TD1TC DITfTCTlTD 11 






MOV 


ROf R5 


|FUT tAPtCffcU liH Ho 






SIC 


*257»R5 


; CLEAR 'JN»"AW-7Ei3 BITS 






MO\fB 


5CR1)#R4 


jPUT "FOUND" INTO R4 






BIC 


•257, R4 


ICLEAR UNWANTED BITS 






CMPB 


R5,R4 


;DATA CORRECT? 






BEQ 


68$ 


;BR IF YES 






HLT 


3 


1 ERROR 






SCOPi 










COM 


RO 


ICHANGE TO FLOATING 1 






CLC 




jCLEAR CARRY 






ROLB 


BO 


jSHIFT BIT IN RO 






BNE 


69S 


;IF R0«0 THEN DONE 






SCOPE 




jSCOPE THIS TEST 







f #***«tt«'**««#*«#**«<^*«***»** TEST 10 
j»LlNE UNIT REGISTER WRITE/READ TEST 
»#FLOAT A i THROUGH LINE UNIT REGISTER 14 
j#FLOAT A THROUGH LINE UNIT REGISTER 14 
1 1 



000010 001226 
0135^)2 001216 
013362 001220 



000014 
000001 



I 
I 

MOV 
MOV 
MOV 



TEST 10 



♦lOiTSTNO 

#TSTll,NEXT 

f64SfL0CK 



H5TCLR 

HOV il4fR2 
MOV #l#RO 

MOV R0r4CRn 
RGMCLK 
132100114 
ROMCLK 

21005U14#20> 
MOV R0#R5 



013436 

000001 



001220 



MOVfi 

CMPB 

BEa 

HLT 

SCOPI 

CLC 

ROLB 

BNE 

MOV 

MOV 



5tRl),R4 
R5#R4 

3 



RO 
64$ 

»67Sf LOCK 
#ifRO 



fRl CONTAINS BASE DMCll ADDRESS 
IMASTER CLEAR DKCll 
jSAVE REGISTER ADDRESS FOR TYPEOUT 
ySTART WITH BIT 

jPUT PATTERN INTO P0RT4 

jNEXT WORD IS INSTRUCTIONi ROMCLK PC«5304 

»MOV DATA TO IBUS REGISTER 14 

jNEXT WORD IS INSTRUCTION. ROMCLK PCb5304 

;READ FROM IfiUS REGISTER 14 

;PUT EXPECTED IN R5 

f PUT "FOUND" INTO R4 

;DATA CORRECT? 

I BR Ir YES 

TERROR 

fSM09*17 

jCLEAR CARRY 

7SHIFT BIT IN RO 

J IF P0»0 THEN DONE 

I NEW SCOPl 

;START WITH BIT 



DZDVt.Pll 12 


-MAY-77 


1943 


013434 


005100 


1944 


01 3436 




1945 


013436 


010061 


1946 


013442 


104414 


1947 


013444 


122114 


1948 


013446 


104414 


1949 


013450 


021305 


1950 


013452 


010005 




J 5454 


116104 


1952 


013460 


120504 


1953 


013462 


001401 


1954 


013454 


104003 


1955 


01 3466 


104401 


1956 


013470 


005100 


1957 


013472 


000241 


1958 


013474 


106100 


1959 


013476 


001356 


i960 


013500 


104400 


1961 






1962 






1963 






1964 






1965 






1966 






1967 






1968 






1969 






1970 






1971 


013502 


012737 


1972 


013510 


012737 


1973 






1974 


013516 


104412 


1975 


013520 


104414 


1976 


013522 


021324 


1977 


013524 


016104 


1978 


013530 


113705 


1979 


013534 


120504 


1980 


013536 


001401 


1981 


013540 


104031 


1982 


013542 


104400 


1983 






1984 






1985 






1986 






1987 






1986 






1989 






1990 






1991 






1992 






1993 


013544 


012737 


199 4 


013552 


012737 


1995 






1996 


013560 


104412 


1997 


013562 


104414 


1998 


013564 


021344 



IIMO PAGE 39 

LINE UNIT WRITE/READ TESTS 



69St 

67$: 



PAGEl 0058 



COM 


BO 


ICHANGE TO FLOATING ZERO 




MOV 


ROf 4(Rn 


J PUT PATTERN INTO P0RT4 




ROMCLK 




fNEXT WORD IS INSTRUCTION, 


ROMCLK 


122100U4 


|MOV DATA TO IBUS REGISTER 


14' 


ROMCLK 




fNEXT WORD IS INSTRUCTION, 


ROMCLK 


2100S1<14«20> 


iREAD FROM IBUS REGISTER 14 


MOV 


RO.RS 


»PUT EXPECTED IN S5 




MQVB 


SCRnfR4 


J PUT "FOUND" INTO R4 




CMPB 


B5fR4 


yDATA CORRECT? 




BEQ 


68t 


jBR IF YES 




HLT 


3 


r ERROR 




SCOPl 




»SW09«17 




COM 


RO 


^CHANGE TO FLOATING 1 




CLC 




rCLSAR CARRY 




ROLB 


BO 


ISHIFT BIT IN RO 




BNE 


691 


fIF R0«0 THEN DONE 




SCOPE 




; SCOPE THIS TEST 





f *««**««»*»«»»»*«**»»«»««*«« .TEST 11 «*«**«*«***««****#»#««#«*«« 

|*SWITCH PAC TEST 

;*THI8 TEST BEADS SWITCH PAC«t 

}*WB SWITCH PAC CONTAINS THE DDCMP LINE I 

1 1 «•***««#•»*««#*••«•»•»**«««*««***»#*«««*««*#««»**•**»*****«#•* 



000004 
001370 



i TEST U 
I— 

MOV 
MOV 



HSTCLR 

ROMCLK 

021324 

MOV 

MOVB 

CMPB 

BEQ 



tUf TSTNO 
#TST12,NEXT 



4(Rn,R4 
5TAT2,R5 
R5f R4 
1» 



SCOPE 



|R1 CONTAINS BASE DMCll ADDRESS 
}MASTER CLEAR DMCll 

yNEXT WORD IS INSTRUCTION, ROMCLK PC«5304 

rP0RT4.LUlS 

I PUT "FOUND" IN R4 

»PUT "EXPECTED" IN H5 

jSW OK? 

|BR IF YES 

fEiRHwBf o'vilTCH FAC READ ERkuB 
t SCOPE THIS TEST 



f »*»«««««««•***««#»«««»««««* TEST 12 **#*«*«««*«#***#*•*«#****«# 

|#SWITCH PAC TEST 

f#THIS TEST BEADS SWITCH PAC«2 

|*THIS SWITCH PAC CONTAINS THE BNB73 BOOT ADD 

t TEST 12 

, ..«......•••.. 

MOV i 12, TSTNO 

MOV ITST13,NEXT 

|R1 CONTAINS BASE DMCll ADDRESS 
MSTCLR {MASTER CLEAR DMCll 

ROMCLK fNEXT WORD IS INSTRUCTION, ROMCLK PCa5304 

021344 fP0RT4.LUi6 



DZDMF MftCYll 30(1046) n-Jl'L-77 I 1 t 40 PAGE 40 

PZD«F .Pit 12-MftY"-77 UMB LIN^ VIMT /<PlTL/PtAD TESTS 



PAGt! 0(159 



149<* 


01 3s66 


016104 


000004 






Mnv 


4(Rl)pP'' 


J PUT "F'nUND" IN R4 


2000 


01 3«;72 


1 1 3705 


001 371 






MOVB 


STAT2+1 #R5 


jPUT "EXPECTED" IN R5 


2001 


01 35 7 6 


1 20504 








CMpB 


R5»P4 


JSW OK? 


200? 


tn 3 ft 


1 1 1 








6E0 


1« 


Jbp IF YES 


200 3 


01 3ft02 


10 4 31 








HLT 


31 


jtPROR, SWITCH PAC READ ERROR 


2004 


01 360 4 


104400 






1$ ! 


SCOPE 




jSCOPE THIS TEST 


2005 


















2006 


















2007 














200*? 












INLINE 


UNIT CLOCK TEST 




200'> 












I*THIS 


TEST VERIFYS THAT THE LU INTERNAL CLOCK 


20 1 












J*CBIT 


1 IN LU-i7) IS 


WORKING 


2011 












1 t 


2012 


















201 3 












; TEST 


13 




2014 


















2015 


01 3606 


012737 


000013 


001226 


TST13! 


MDV 


*13vTSTN0 




201t> 


01 3614 


012737 


013706 


001216 




MOV 


»TST14#NEXT 




2017 
















;R1 CONTAINS BASE DMCll ADDRESS 


2018 


01 3622 


104412 








MSTCLP 




jMASTER CLEAR DMCll 


2019 


013624 


005037 


001416 






CLP 


TEMP 


^PREPARE FOR DELAY 


2020 


01 3630 








ISI 








2021 


013630 


104414 








ROMCLK 




(NEXT WORD IS INSTRUCTION, ROMCLK PCa5304 


2022 


013632 


021364 








031364 




IP0RT4.LU-17 


2023 


013634 


032761 


000002 


000004 




BIT 


t2r4(Rl} 


lis CLOCK BIT SET? 


2024 


013642 


001004 








BNE 


28 


rBR IF YES 


2025 


013644 


1)05237 


001416 






INC 


TEMP 


I DELAY 


2026 


01 3650 


001367 








BNE 


U ; DELAY 


FINISHED? 


2027 


013652 


104004 








HLT 


4 


J ERROR BIT IS STUCK CLEAR 


2028 


01 3654 


005037 


001415 




211 


CLP 


TEMP 


T PREPARE FOR DELAY 


2029 


01 3660 








38t 








2030 


01 3660 


104414 








POMCLK 




}NEXT WORD IS INSTRUCTION, ROHCLK PCb5304 


2031 


013662 


021364 








021364 




;POPT4.LU-17 


2032 


01 36*'4 


032761 


000002 


000004 




BIT 


l2r4(Rl} 


lis CLOCK BIT CLEAR? 


2033 


013672 


001404 








BEQ 


4S 


|BR IF. YES 


2034 


01 3674 


005237 


001416 






INC 


TEMP 


1 DELAY 


2035 


01 3700 


0O1367 








BNE 


3« 


|BR IF DELAY NOT DONE 


7036 


01 3702 


104004 








HLT 


4 


jERRDR BIT IS STUCK SET 


2037 


01 3704 


104400 






4$l 


SCOPE 






2n3R 


















2039 


















2040 












1 «*»»**»*»*««*««««««*«**#«*» TEST 14 «#**««»»*«»«»««tt#««*#»**«tttt 


2041 












^♦OUT DATA SILO TEST 




2042 












I»5ET SOM AND LOAD OUT 


DATA SILO 


2043 












I#VERirY THAT OCOR SET 


, INDICATING THAT THE 


2044 












r»CHAPACTER IS AT THE 


BOTTOM OF THE OUT SILO 


2045 


















2046 


















2047 












1 TEST 


U 




2048 


















2049 


01 3706 


012737 


000014 


001226 


TST14I 


MOV 


«14,TSTN0 




2050 


01 3714 


ni2737 


014006 


001216 




MOV 


#TST15rNEXT 




7051 
















|R1 CONTAINS BASE DMCll ADDRESS 


2052 


0! 3722 


104412 








MSTCLR 




1 MASTER CLEAR DMCll 


2053 


01 3774 


012711 


004000 






MOV 


#B1T11#CR1) 


|SET LINE UNIT LOOP 


7054 


013730 


012761 


OOOOOl 


OOQ004 




MOV 


#lf4CRl) 


iLOAD P0RT4 «ITH BITO 



DZDME MACYH 30( 1046) U-JUL-T? 



0^D^•E,P11 12 


-Mftlf-77 


14118 


2055 


013736 


104414 




7056 


013740 


1221U 




2057 


013742 


104414 




2059 


013744 


122U0 




2059 


013746 


104416 


000002 


20ftO 


013752 


012702 


000017 


2061 


0137S6 


104414 




2062 


013760 


021364 




2063 


013762 


016104 


000004 


2064 


013766 


042704 


000357 


2065 


013772 


012705 


000020 


2066 


01 3776 


120504 




2067 


014000 


001401 




20fi8 


014002 


104005 












2070 


01400 4 


104400 




2071 








2072 








207 3 








2074 








2075 








2076 








2077 








207R 








2079 








2090 








2081 








2082 


014006 


012737 


000015 


20P3 


014014 


012737 


014144 


2084 








20P5 


014022 


104412 




2086 


014024 


0127U 


004000 


2087 


014030 


012761 


OOOOOl 


208fi 


0140 3^ 


10441 4 




2089 


014040 


122111 




2090 


014042 


104414 




2091 


014044 


122110 




2092 


O14046 


004737 


026350 


2093 


014052 


1 04415 


000002 


2094 


014056 


012702 


OOOOll 


2095 


O14062 


104414 




2096 


014064 


021224 




2097 


01 4066 


016104 


000004 


2098 


014Q72 


042704 


000257 


2099 


014076 


012705 


000120 


2100 


014l'>2 


120504 




2101 


01 4t04 


001401 




2102 


014106 


104005 




?103 


014UO 






2104 


014110 


012702 


000013 


2105 


014114 


104414 




2106 


014116 


021264 




31 07 


01 At2'> 


01 6104 


000004 


2ine 


014124 


C427Q4 


000337 


21.09 


OHt 30 


^12705 




5110 
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PAGEi 006C 



TST15I 



ROMCLK 




I NEXT WORD IS INSTRUCTION, 


122111 




|5ET SOM 


ROMCLK 




jNEXT WORD IS INSTRUCTION, 


122110 




}LOAD OUT DATA SILO 


TIMER* 


2 


fWAIT FOR OCOR 


MOV 


in#R2 


I SAVE ADDRESS FOR TYPEOUT 


ROHCLK 




fNEXT WORD IS INSTRUCTION, 


021364 




IP0RT4.LU 17 


MOV 


4(Rn,P4 


(PUT "FOUND" IN R4 


BIC 


1357, R4 


iCLEAR UNWANTED BITS 


MOV 


120, R5 


jPUT "EXPECTED" IN R5 


CMPB 


R5,R4 


;IS OCOR SET? 


BEQ 


If 


jBR IF YES 


HLT 


5 




SCOPE 




|6CU^E IHiS lESI 




»#DDCHP 


TEST OF RT5 


AND OUT ACTIVE 



ROMCLK PC»5304 



ROMCLK PC«5 304 



ROMCLK PCB5304 



(•SET SOM AND LOAD OUT DATA SILO 
(•SINGLE STEP 2 DATA CLOCKS, VERIFY 
(•THAT RTS AND ACTIVE ARE SET 

1 1 ###»#»##«♦»•»*#♦#######»»»#«♦•»»###»»♦•♦•#••#•••••#••#•••••••• 

f TEST 15 

MOV 
MOV 



I15,TSTN0 
•TST16,NEXT 



MSTCLR 

MOV 

MOV 

ROMCLK 
132111 
ROMCLK 
122110 
JSR 

DATACLK, 
MOV 

ROMCLK 
021234 

MOV 

BIC 

MOV 

CMPB 

BEQ 

HLT 

MOV 

ROMCLK 
021264 
MOV 
BIC 

MOV 



#BITU,(Rn 
«1,4CR1) 



PC, OCOR 



4CR1),R4 

1257, R4 

1120, R5 

R5iR4 

II 

5 



(Rt CONTAINS BASE DMCIJ ADDRESS 
(MASTER CLEAR DMCll 
(SET LINE UNIT LOOP 
(LOAD P0RT4 WITH BITO 

(NEXT WORD IS INSTRUCTION, ROHCLK PC«5304 
(SET SOM 

(NEXT WORD IS INSTRUCTION, ROMCLK PC«S304 

(LOAD OUT DATA SILQ 

(WAIT FOR OCOR 

(CLOCK DATA FOUR TIMES 

(SAVE ADDRESS FOR TYPEOUT 

(NEXT WORD IS INSTRUCTION, ROMCLK PC*5304 

(PQRT4-LU 11 

(PUT "FOUND* IN R4 

(CLEAR UNWANTED BITS 

(PUT "EXPECTED" I!* R5 

(IS ACTIVE SEX? 

|8R IF YES 



tl3,R2 



4(»i),B4 
1337, R4 

lBIT5,i^S 
P5,S4 



(SAVE ADDRESS FDR TYPEOUT 
(NEXT WORD IS I^STRUCnOJ^, 
»P0RT4»LU 13 

?PUT EXPECTED IN fi4 
jCLEAR UN^»A^TED BUS 
(PUT "EXPECTED- XV 1^5 1 ?.TB 
|I-S P.T.f- QK? 
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DZDMt.Pn l2-^^J!Y-77 14tiB BASIC TPAHSMITTFR TESTS 



PAGti 0061 



2111 




01401 




2112 




104005 




2113 








21 ■ 4 


f . , 4 1 4 2 


1 ri 4 i 




2115 








211" 








? 1. 1 7 








' ft 








211" 








2120 








2121 








2122 








2123 








2124 








2125 










n 1 A 4 /LA 


012737 


000016 


212 7 


014152 


0127 37 


014342 


2128 








2129 




104412 




2130 




012711 


004000 


2131 


01416 6 




V w U ^.f V * 


2132 


1 4 1 7 4 


104414 




^! 1^ 




1221 11 




2134 


n 1 A «i n n 


104 414 








1221 10 




2136 


01 4204 




026350 


2137 


014210 


1^4 415 




?n 




012761 


noo9nn 


2139 


014222 


4 mn A 
1 u** 1 * 






n ^ 4^24 


122111 








1 04415 


000001 




014232 


01 2702 


OfiOO 1 7 


214 3 


014236 


104414 






rxH &f\ 


021364 










nooood 

V w U U U Tl 


214^ 


Ul 4246 


042 704 


000357 


2147 


014252 


005005 




2148 


014254 


120504 




2149 


1 4256 


1 401 




e? 


n 4 A*^ fkfi 


J, U*t U 3 




2151 


014262 










012702 


00001 3 


2 1 S i 


01 4 266 


1 0441 4 




21^^ 








2155 


014272 


016104 


UvUUU^ 


21 5h 


014276 


* / f * 


000337 


21 57 


014 30 2 


005005 




21Sfi 


014304 


120504 




2159 


014306 


001401 




2160 


014310 


1G40CS 




21ftl 


014312 






2162 


014312 


012702 


oooon 


2163 


014316 


104414 




2164 


OM320 


021224 




2165 


014322 


016104 


000004 


7ibt 


014326 


012705 


000020 



BEQ 
HLT 



2$ 

5 



jbB IF YES 
;RTS ERPOP 



;SC0PF: this TEST 



2$I 



I »##»#**»##♦#•#»*«*♦»*#»*»•» TEST 16 *#*#«■*♦»♦#♦«♦**♦*♦♦»#♦#•##* 

J •TEST OF OUT CLEAR 

j*5ET SQM AND LOAD OUT DATA SILO 

,#SINGliE STEP DATA CLOCK, SET OUT CLEAR 

(•VERIFY THAT QC0R,RT5, AND ACTIVE ARE CLEAPED 

; { »***«*«#«**#*«***«*««*«*»*#««#*»«#*«•*««««***•««'«#*«•*■»«•*•»««« 



1 TEST 


16 








MOV 


H6f TSTNO 








MOV 


#TST17f NEXT 












(Rl CONTAINS BASE DMCU ADDRESS 




MSTCLR 




(MASTER CLEAR DMCll 






MOV 


IBITllr (Rl} 


(SET LINE UNIT LOOP 






MOV 


llf 4CRn 


(LOAD P0RT4 WITH BITO 






ROHCLK 




(NEXT WORD IS INSTRUCTION, 


ROMCLK 


PCaS3Q4 


1221 I I 




( SET SOM 






ROMCLK 




(NEXT WORD IS INSTRUCTION, 


ROMCLK 


PCB5304 


122110 




(LOAD OUT DATA SILO 






JSR 


PCfOCOP 


(WAIT FOR OCOR 






DATACLKi 


r 2 


(CLOCK DATA FOUR TIMES 






MOV 


iBIT7#4CRl ) 


(SET BIT7 IN P0RT4 






ROMCLK 




(NEXT WORD IS INSTRUCTION, 


ROMCLK 


PCB5304 


122111 




(SET OUT CLEAR 






DATACLK( 


, i 


f^aiy't A TICK TO CLEAR RT5 






MOV 


ll7rR2 


(SAVE ADDRESS FOR TYPEOUT 






ROMCLK 




(NEXT WORD IS INSTRUCTION, 


ROMCLK 


PCs5304 


021 364 




(P0RT4.LU 17 






MOV 


4CR1)*R4 


(PUT "FOUND" IN R4 






BIC 


1357, R4 


(CLEAR UNWANTED BITS 






CLR 


F5 


(PUT "EXPECTED" IN R5 






CMPB 


R5fR4 


(IS OCOR CLEARED? 






BCQ 


18 


(BR IF YES 






HLT 


5 






nOV 


f iif n2 


J SAVE ADDRESS FOR TYPEOUT 






ROMCLK 




(NEXT WORD IS INSTRUCTION, 


ROMCLK 


PC«5304 


021264 




(P0RT4.LU 13 






MOV 




(PUT EXPECTED IN R4 . 






BIC 


#337, R4 


(CLEAR UNWANTED BITS 






CLR 


R5 


(PUT "EXPECTED" IN R5, RTS 


SHOULD 


BE CLEARED 


CMPB 


R5,R4 


(IS RTS OK? 






BEQ 


2$ 


(BR IF YES 






HLT 


5 


iRTS ERROR 






MOV 


tU,R2 


(SAVE ADDRESS FOR TYPEOUT 






ROMCLK 




(NEXT WORD IS INSTRUCTION, 


ROMCLK 


PC«5304 


021224 




(P0PT4.LUn 






MOV 


4(R1),R4 


(PUT "FOUND" IN R4 






MOV 


IBIT4,R5 


(ONLY OUT READY SHOULD BE 


set 
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-MAy-77 


14118 


2167 


014332 


120504 




2168 


014334 


001401 




2169 


014336 


104005 




2170 


014340 






2171 


014340 


104400 




2172 








2173 








2174 








2175 








2176 








2177 








2178 








2179 








21 RO 
2181 








218? 








21fl3 








21«4 


014342 


012737 


000017 


2185 


014350 


012737 


014524 


2186 








2187 


014356 


104412 




2188 


014360 


012711 


004000 


21fl9 


01 4364 


O04737 


026502 


2190 


014370 


012761 


000001 


2191 


014376 


104414 




2192 


014400 


122111 




2193 


014402 


012705 


000000 


2194 


014406 


004737 


026502 


2195 


014412 


010561 


000004 


2196 


01 4416 


104414 




2197 


OJ4420 


122110 




2199 


014422 


004737 


026350 


2199 


014426 


005003 




2200 


014430 


010502 




2201 


014432 


104415 


000002 


2202 


014436 


104415 


OOOOOl 


2203 


014442 


106002 




2204 


014444 


103005 




2205 


014446 


004737 


026316 


2206 


014452 


103406 




2207 


014454 


104006 




2208 


014456 


000404 




2209 


014460 


004737 


026316 


2210 


014464 


103001 




2211 


014466 


104006 




2212 


014470 






2213 


014470 


005203 




2214 


014472 


022703 


OOOOlO 


2215 


014476 


001357 




2215 


014500 


104415 


000014 


2217 


014504 


104414 




2219 


014506 


021264 




2219 


014510 


032761 


000040 


2220 


014516 


001401 




2221 


014520 


104034 




2222 


014522 


104400 
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BASIC TRANSMITTER TESTS 

CMPB 

BEQ 

HLT 

3»t 

SCOPE 



PAGEt 0062 



29t 
391 



R5fR4 

3S 

S 



(IS ACTIVE CLEAR? 
(BR IF YES 

(ERROR ACTIVE NOT CLEARED 
■ (SCOPE THIS TEST 



( ww«ft«««"»«««««»ft{^»«««e«««««» 7ES? 
(•DDCMP TRANSMITTER TEST 
(•SINGLE CLOCK THE CHARACTER 
(•VERIFY EACH BIT POSITION AS IT 
(•PASSES THE BIT WINDOW (SI BIT) 

(•ON AN ERROR, R3 CONTAINS BIT POSITION OF FAILURE 

( I *••*«-#*««««*«*«#****«***»»««««#»*«#*#**#«*«-««-•***•••««••••**«« 



( TEST 


17 






MOV 


#17#T5TN0 






MOV 


#TST20,NEXT 










(Rt CONTAINS BASE DMCll ADDRESS 




MSTCLR 




(MASTER CLEAR DMCll 




MOV 


tBITll, CRD 


(SET LINE UNIT LOOP 




JSR 


PC,OUTRDY 


I WAIT FOR OUT-READY 




MOV 


llr4CRU 


(SET BITO IN P0RT4 




ROMCLK 




(NEXT WORD IS INSTRUCTION, ROMCLK 


PC«5304 


122111 




(SET SDMI 




MOV 


10, R5 (LOAD 


CHARACTER IN R5 FOR TYPEOUT 




JSR 


PCOUTRDY 


(WAIT FOR OUT-READY 




MOV 


R5,4CRn 


(LOAD P0RT4 WITH CHARACTER 




ROMCLK 




(NEXT WORD IS INSTRUCTION, ROHCLK 


PCa5304 


122110 




(LOAD OUT DATA 




JSR 


PC, OCOR 


(WAIT FOR OCOR TO SET 




CLR 


R3 


(CLEAR BIT COUNTER 




MOV 


R5,R2 


(LOAD CHARACTER IN R2 




DATACLK, 


2 


(2 TICKS TO SET UP TRANSMITTER 




DATACLK, 


1 


(SHIFT NEXT BIT IN THE WINDOW (SI 


BIT) 


ROpB 


R2 


(SHIFT NEXT SOFTWARE BIT IN TO CARRY 


BCC 


2$ 


(BR IF CARRY CLEAR 




JSr 


PCGCTSX 


(G&T THE WINDuin 




BCS 


3$ 


(BR IF BIT IS A HARK 




HLT 


6 


(ERROR BIT WAS A SPACE 




BR 


3S 


(CONTINE ¥ITH TEST 




JSR 


PCGETSI 


(GET THE WINDOW 




BCC 


38 


(BR IF BIT IS A SPACE 




HLT 


6 


(ERROR BIT WAS A MARK 




INC 


R3 


(NEXT BIT 




CMP 


tlO,R3 


(DONE YET? 




BNE 


18 


(BR IF NO 




DATACLK, 


14 


(CLOCK TRANSMITTER 14 MORE TICKS 




ROMCLK 




(NEXT WORD IS INSTRUCTION, ROMCLK 


PC«5304 


021264 




(PORT4U-U-13 




BIT 


iBIT5,4(Rl} 


(RTS SHOULD BE CLEAR NOW 




BEQ 


48 


(BR IF YES 




HLT 


34 


(ERROR, RTS NOT CLEAR 




SCOPE 




(SCOPE THIS TEST 
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PAGEl 0063 











222 4 
















777 








22 2 7 








222B 








2229 








223*5 








22 31 








22 32 








22 1(3 








22 34 








2235 


Q J 4524 


1 27 37 


000020 


2236 


014532 


01 2737 


014706 


22 37 








2238 


014540 


104412 




2239 


014542 


012711 


004000 


22 40 


14546 


004737 


026502 


2241 


14552 


012761 


000001 


2242 


014560 


104414 




2243 


014562 


122111 




2244 


014564 


01 2705 


000125 


2245 


01 4570 


0047 37 


026502 


2246 


1 457 4 




U V V V V *t 


2247 


V 1 "t o V V 


1 044 1 4 




2249 


01 4602 


122110 




2249 


01 4604 


0047 37 


026350 


2250 




Vf U ^ V V J 




225 i 


01 461 2 






2252 


014614 


104415 


000002 


2253 


1 4620 


104415 


00000 1 


2254 




106002 




2255 


014626 


A U J U V 7 




2256 




004737 


026 3 1 6 


2257 


014634 


1 03406 




2258 


01 4636 


i U H V w w 




2259 


1 464 


000404 




2260 




O047 37 


0263 1 6 


2261 


ol4646 


103001 




2262 


014650 


104006 




276 3 








22ft4 


1 4652 


005203 




2265 


1 4654 


022703 


U vUv 1 U 


2266 


014660 


001357 




2267 






U UvU 1 1 


226B 


X ** D O O 


1 044 1 4 




2269 


1 467 


02 1 264 




2270 


b 1 4672 


32761 


UUUU*IU 


227 1 


Ot 4700 


001401 




2272 


014702 


104034 




2273 


01 4704 


104400 




2274 








2275 








2276 








2277 








2278 









2SI 
3St 



)#♦#»»»##*♦##•»♦*#*»##»*♦#«• TEST •#*•#♦#♦#••#•###*#♦»#»#•»■»« 

}*DDCMP TRAN5M1TTEH TEST 
[♦SINGLE CLOCK THE CHARACTER 125 
;*VEPIFY EACH BIT PUSITIQN AS IT 
»#PA5SES THE BIT WINDOW (SI BIT) 

j#QN AN EPRORr P3 CONTAINS BIT POSITION OF FAILURE 



1 TEST 


20 






MOV 


1 20 r TSTNO 






MOV 


IT5T21 f NEXT 










jRl CONTAINS BASE DMCll ADDRESS 




MSTCLP 




JKASTEP CLEAR DMCll 




MOV 


f BITll f (Rl ) 


TSET LIME UNIT LOOP 




JSR 


PC f OUTRDY 


fWAIT FOR OUT-BEADY 




MOV 


ltr4CRl) 


ySET BITO IN P0PT4 




BOMCLK 




jNEXT WORD IS INSTRUCTION, ROMCLK 


PC=5304 






JSET SOMi 




MOV 


ii25iR5 ;LOAD 


CHARACTER IN R5 FOR TYPEOUT 




JSR 


PCOUTPDTf 


|WAIT FOR OUT-BEADY 




MOV 


R5f4(Rl) 


|LOAD P0RT4 WITH CHARACTER 




ROMCDK 




fNEXT WORD TS INSTRUCTION, ROMCLK 


PC«5304 


122110 




jLOAD OUT DATA 




JSR 


PC#OCOR 


J WAIT FOR OCOR TO SET 




CLB 


R3 


jCLEAR BIT COUNTER 




MOV 


R5,R2 


iLOAD CHARACTER IN R2 




DATACLK, 


2 


|2 TICKS TO SET UP TRANSMITTER 




DATACLKj 


J 


ISHIFT NEXT BIT IN THE WINDOW (SI 


BIT) 


RORB 


R3 


ISHIFT NEXT SOFTWARE BIT IN TO CARRY 


BCC 


2f 


|BR IF CARRY CLEAR 




JSR 


PC r GETS I 


jGET THE WINDOW 




BCS 


3« 


jBR IF BIT IS A MARK 




HLT 


6 


lERRQR BIT WAS A SPACE 




BR 


3t 


jCONTINE WITH TEST 




JSR 


PC#GET5I 


fGET THE WINDOW 




BCC 


30 


|BR IF BIT IS A SPACE 




HLT 


6 


(ERROR BIT WAS A MARK 




INC 


R3 


fNEXT BIT 




CM? 


*10fR3 


J DONE YET? 




6NE 


It 


|BR IF NO 




DATACLK, 


14 


ICLDCK TRANSMITTER 14 MORE TICKS 




RQHCLK 




fNEXT WORD IS INSTRUCTION, ROMCLK 


PC«5304 


021264 




f PORT4,LU-13 




BIT 


IBIT5r4(Rl) 


fPTS SHOULD BE CLEAR NOW 




BEQ 


4$ 


fBR IF YES 




HLT 


34 


fERROR, RTS NOT CLEAR 




SCOPE 




f SCOPE THIS TEST 





I TEST 21 
f»DDCMP TRANSMITTER TEST 
|*5INGLE CLOCK THE CHARACTER 252 



DZDME MACYU 30(1046) ll-JUL«77 





Pn 12 


-HAY-77 


14118 


2279 








2290 








2291 








27^7 








22RJ 








2284 








22?5 








2296 


014706 


012737 


000021 


2287 


014714 


012737 


015070 


2289 








2289 


014722 


104412 




2290 


014724 


012711 


004000 


2291 


O14730 


004737 


026502 


2292 


01 4734 


012761 


000001 


2293 


014742 


104414 












2295 


014746 


012705 


000252 


2296 


014752 


004737 


026502 


2297 


014756 


010561 


000004 


2298 


014762 


104414 




2299 


014764 


122UQ 




2300 


014766 


004737 


026350 


2301 


014772 


005003 




2302 


014774 


010502 




2303 


014776 


104415 


000002 


2304 


015002 


104415 


OOOOOl 


2305 


015006 


106002 




2306 


015010 


103005 




2307 


015012 


004737 


026316 


2308 


015016 


103406 




2309 


015020 


104006 




2310 


015022 


000404 




2311 


015024 


004737 


026316 


2312 


015030 


103001 




23i3 


015032 


104006 




2314 


O15034 






2315 


015034 


005203 




2316 


015036 


022703 


OOOOlO 


2317 


015042 


001357 




2319 


015044 


104415 


000014 


2319 


015050 


104414 




2320 


015052 


021264 




2321 


015054 


032761 


000040 


2322 


015062 


001401 




2323 


015064 


104034 




2324 




10**00 




2325 








2326 








2327 








2328 








2J29 








23 3'^ 








23 3 1 








233? 








233 ? 
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PAGSl 0064 



TST2U 



281 
3«l 



I»VEBIFY EACH BIT POSITION AS IT 
?#PA5SES THE BIT WINDOW (SI BIT) 

(•ON AN ERROR, R3 CONTAINS BIT POSITION OF FAILURE 

1 I #»»♦#•###♦#♦####♦•###########♦•»♦###*••#•#•#»••#«###♦♦#♦#«*»## 



t TEST 


21 






MOV 


t21|TSTN0 






MOV 


tTaT22»NEXT 










fRl CONTAINS BASE DMCll ADDRESS 




M5TCLR 




1 MASTER CLEAR DMCll 




MOV 


iBITUitRl) 


fSET LINE UNIT LOOP 




JSR 


PC, OUTRDY 


fWAIT FOR OUT-READY 




MOV 


n#4CRl) 


fSET BITO IN P0RT4 




ROMCLK 




fNEXT WORD IS INSTRUCTION, ROMCLK 


PCSS304 


129111 




iSET SOMI 




MOV 


l2S2rR5 fLOAD 


CHARACTER IN H5 FUR It'^LQul 




JSR 


PCOUTRDY 


fWAIT FOR OUT-READY 




MOV 


RSf 4CR1) 


fLOAD P0RT4 WITH CHARACTER 




ROMCLK 




fNEXT WORD IS INSTRUCTION, ROMCLK 


PCVS304 


122110 




iLOAD OUT DATA 




JSR 


PC, OCOR 


fWAIT FOR OCOR TO SET 




CLR 


B3 


fCLEAR BIT COUNTER 




MOV 


R5,R2 


(LOAD CHARACTER IN R2 




DATACLKi 


1 2 


f2 TICKS TO SET UP TRANSMITTER 




DATACLKj 


f 1 


iSHIFT NEXT BIT IN THE WINDOW CSI 


BIT) 


RORB 


R2 


f SHIFT NEXT SOFTWARE BIT IN TO CARRY 


BCC 


2» 


|BR IF CARRY CLEAR 




JSR 


PC, GETS! 


fGET THE WINDOW 




BCS 


3» 


fBR IF BIT IS A MARK 




HLT 


6 


fERROR BIT WAS A SPACE 




BR 


3$ 


fCONTINE WITH TEST 




JSR 


PCGETSI 


fGET THE WINDOW 




BCC 


3S 


fBR IF BIT IS A SPACE 




HLT 


6 


fERROR BIT WAS A MARK 




INC 


R3 


fNEXT BIT 




CMP 


#10, R3 


fDONE YETT 




BNE 


19 


fBR IF NO 




DATACLK, 


f 14 


fCLOCK TRANSMITTER 14 MORE TICKS 




ROMCLK 




fNEXT WORD IS INSTRUCTION, RORCLK 


PC»5304 


021264 




fPORX4«LU-13 




BIT 


|BIT5,4CR1) 


fRTS SHOULD BE CLEAR NOW 




BEQ 


4S 


IBR IF YES 




HLT 


34 


fERROR, RTS NOT CLEAR 




SCOPE 




fSCOPE THIS TEST 





f TEST 22 #•♦#♦»*#♦##*#*•*»•#♦*»#»*** 

)*DDCMP TRANSMITTER TEST 
f*3INGLC CLOCK THE CHARACTER 37? 
t»VEBlFY EACH BIT POSZtlDN AS IT 
|*PASSE5 THE BIT WINDOW (SI rtXT) 

f»ON AN ERROR, R3 CONTAINS BIT POSITION OF FAILURE 
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2335 
23if> 
23i^ 
233B 
2339 
2340 
2341 
2342 
2343 
2344 
2345 
2346 
2347 
2348 
2349 
2350 
2351 
2352 
2353 
2354 
2355 
2356 
2357 
2358 
2359 
2360 
2361 
2362 
2363 
2364 
23b5 
2366 
2367 
2360 
2369 
2370 
2371 
2372 
2373 
2374 
2375 
2376 
2377 
2378 
2379 
2380 

2391 
2382 
2383 

2384 
2385 
2386 
2387 

23Sf! 



iHS070 
015076 

015104 
i)l5i06 
015112 
015116 
Ot5l24 
015126 
015130 
015134 
Ol5l40 
015144 
015146 
015150 
015154 
015156 
015160 
015164 
015170 
015172 
015174 
015200 
015202 
015204 
015206 
015212 
C15214 
015216 
015216 
015220 
015224 
015226 
015232 
015234 
015236 
015244 
015246 
0t5?5Q 



012737 


000022 001226 


TST22 1 


MDV 


#22f TSTND 






012737 


015252 001216 




MQv 


1 TST23 f NEXT 
















;F1 CONTAINS BASS OMCil ADDRESS 




104412 






MSTCLR 




J MASTER CLEAR DMCll 




01271 1 


004000 




MOV 


iBITli r (Pt } 


JSET LINE UNIT LOOP 




004737 


026502 




JSR 


?C» OUTRDY 


jWAIT rOR CUT*READTf 




012761 


000001 000004 




MOV 


#lf 4CP1) 


|S£T BITO IN P0PT4 




104414 






POmCLK 




;NCXT WORD IS INSTRUCTI0N» POMCLK 


PC»5304 


122111 






122111 




iStT SOHI 




012705 


000371 




MOV 




CHARACTER IM R5 FOP TYPEOUT 




004737 


026502 




JSF 


PC » UUTrui 


jWAIT FOR OUT-READY 




010561 


000004 




MOV 


R5# 4CR1 5 


jLOAD pnRT4 WITH CHARACTER 




104414 






POMCLK 




JNEXT WORD IS INSTRUCTION, POMCLK 


PC«5304 


122110 






1221 10 




ILOAD OUT DATA 




004737 


026350 




JSR 


on n^no 
Pw# UV.Uh 


|WAIT FOR QCQB TO SET 




005003 






CLR 


R3 


fCLEAP BIT COUNTER 




010502 






MOV 


R5f R2 


jLOAD CHARACTER IN R2 




1044J5 


000002 




DATACLKi 


2 


t2 TICKS TO SET UP TRANSMITTER 




104415 


000001 


li 1 




r 1 


ISHIFT NEXT BIT IN THE WINDOW (SI 


BIT3 


106002 






R0r8 


R2 


ySHIFT NEXT SOFTWARE BIT IN TO CARRY 


1 03005 






BCC 


3$ 


jBR IF CARRY CLEAR 




004737 


026316 




J5H 




iGET THE WINDOW 




103406 






BCS 


3t 


»BR IF BIT IS A MARK 




1 04006 






HIjT 


6 


fERROR BIT WAS A SPACE 




000404 






BP 


31 


^CONTINE WITH TEST 




004737 


026316 


2$ 1 


JSR 




J GET THE WINDOW 




103001 






BCC 


31 


|BR IF BIT IS A SPACE 




i 40C6 






HLt 




lERROR BIT WAS A MARK 




005203 




3tl 


INC 


R3 


rNEXT BIT 




022703 


ooooto 




CMp 


tlO,R3 


|DO^fE YET? 




001357 






BNE 


1« 


|BR IF MO 




104415 


000014 




DATACLK, 


14 


ICLOCK TRANSMITTER 14 MORE TICKS 




104414 






ROMCLK 




J NEXT WORD IS INSTRUCTION, POMCLK 


PCB5304 


021264 






021264 




»P0RT4^U-13 




032761 


000040 000004 




BIT 


tBlT5r4(Rn 


}RTS SHOULD BE CLEAR NOW 




001401 






BEQ 




|BR IF YES 




104034 






HLT 


34 


lEPRORf RTS NOT CLEAR 




104400 




4$t 


SCOPE 




; SCOPE THIS TEST 





)##«»#*»««*»•*»«»*««»»»#***» TEST 23 «««•***#****«« 

»*DDCHP TRANSMITTER TEST 

)«SINGLE CLOCK A BINARY COUNT PATTERN 

|#VERlFy EACH BIT POSITION AS IT 
|«PASSES THE BIT WINDOW (SI BIT) 

|«0N AN ERROR, R3 CONTAINS BIT POSITION OF FAILURE 

)#AND PS CONTAINS THE CHARACTER THAT FAILED 

1 1 »**»•*»«««**««»»«««#«»#**•*•«*»»*«»«««*«#«««*«««# 

f TEST 23 



23g9 


015252 


012737 


000023 


2390 


015260 


012737 


015460 


D2DME 


MACYll 30(1046) 


11-JUL- 


DZDMt.Pll 12-MAY-77 14118 


2391 








2392 


015266 


104412 




2393 


015270 


012711 


004000 


2394 


015274 


005003 




2395 


015276 


005004 




2396 


015300 


U05005 




2397 


015302 


004737 


026502 


2398 


015306 


Ol2?6i 


OOOCOi 


2399 


015314 


104414 




24O0 


015316 


122111 




2401 


015320 


004737 


026502 


2402 


015324 


010461 


000004 


2403 


015330 


104414 




2404 


015332 


122U0 




2405 


015334 


005204 




2406 


015336 


004737 


026502 


2407 


015342 


010461 


000004 


2408 


015346 


104414 




2409 


015350 


122110 




2-110 


015352 


004737 


026350 


2411 


015356 


104415 


000002 


2412 


015362 


005003 




2413 


015364 


010502 




2414 


015366 


104415 


OOOOOl 


2415 


015372 


106002 




2416 


015374 


103005 




2417 


015376 


004737 


026316 


2418 


015402 


103406 




2419 


015404 


104006 




2420 


015406 


000404 




2421 


015410 


004737 


026316 


2422 


015414 


103001 




2423 


015416 


104006 




2424 


015420 






2425 


015420 


009203 




2426 


015422 


022703 


000010 


2427 


015426 


001357 




242ft 


015430 


005204 




2429 


015432 


004737 


026502 


2430 


015436 


010461 


000004 


2431 


015442 


104414 




2432 


015444 


12211c 




2433 


015446 


005205 




2434 


015450 


022705 


000400 


2435 


015454 


001342 




2436 


015456 


104400 




2437 








2438 








2439 








2440 








2441 








2442 








2443 








2444 








2445 








2446 









001226 
001216 



TST23I 



MOV 
MOV 



f23,TSTNO 
tTST24,NEXT 



140 PAGE 47 

BASIC TRANSMITTER TESTS 



411 

lit 



2n 



MSTCLR 

MOV 
CLP 
CLP 
CLP 
JSR 
MOV 

POMCLK 
1221U 
JSR 
MOV 

POMCLK 
122U0 
INC 
JSR 
MOV 

POMCLK 
122110 
JSR 

DATACLKf 
CLP R3 
MOV R5#R2 
DATACSjK* 



»BIT11,(R1) 
R3 
P4 
P5 

PC#0UTRDY 
tl,4CRi) 

PCfOUTRDY 
R4r4CRn 



R4 

PCOUTRDY 
R4r4CRn 



RCMCLK ?Cs5304 



PCfOCQR 



RQPB 
BCC 
JSP 
BCS 
HLT 
BR 
JSR 
BCC 
HLT 

INC 
CMP 
BNE 
INC 

MOV 

ROMCLK 

122110 

INC 

CMP 

BNE 

SCOPE 



P2 
2t 

PCGETSI 

31 

6 

31 

PCfGCTSI 

39 

6 

R3 

#10, R3 
IS 

R4 ^^^^^^^ 
R4',4CRi)' 



RS 

1400, R5 
4ft 
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I PI CONTAINS BASE DMCll ADDRESS 
fMASTER CLEAR DMCll 
>SET LINE UNIT LOOP 
jR3 CONTAINS BIT COUNT 

lR4 CONTAINS CHAR TO BE LOADED IN SILO 
}R5 CONTAINS CHARACTER CURRENTLY BEING SHIFTED 
J WAIT FOR OUT-READY 
tSET BITO IN P0RT4 
)NEXT WORD IS INSxRuCTlun, 
}SET SOMl 

I WAIT FOR OUT-READY 
iLOAD P0RT4 WITH CHARACTER 
J NEXT WORD IS INSTRUCTION, ROMCLK PCbS304 
iLOAD OUT DATA 

I INCREMENT TO NEXT CHARACTER 
I WAIT FOR OUT-READY 
iLOAD P0RT4 WITH CHARACTER 
;NEXT WORD IS INSTRUCTION, ROMCLK PC»5304 
jLOAD OUT DATA 
I WAIT FOR OCOR TO SET 
1 2 TICKS TO SET UP TRANSMITTER 
(CLEAR BIT COUNTER 
I LOAD CHARACTER IN R2 

iSHlFT NEXT BIT IN THE WINDOW (SI BIT) 
p SHIFT NEXT SOFTWARE BIT IN TO CARRY 
fBR IF CARRY CLEAR 
;GET THE WINDOW 
)BR IF BIT IS A MARK 
(ERROR BIT WAS A SPACE 
ICONTINE WITH TEST 
(GET THE WINDOW 
(BR IF BIT IS A SPACE 
(ERROR BIT WAS A HARK 



(NEXT BIT 

(DONE YETT 

(BR IF NO 

(NEXT CHARACTER 

*WAIT FOR OUT-READY 

(LOAD P0RT4 WITH CHARftCTeiR 

(NEXT WORD IS INSTRUCTION, ROMCLK PC«5304 

(LOAD OUT DATA 

(NEXT CHARACTER 

(DONE YET? 

(BP IF NO 

(SCOPE THIS TEST 



I ♦###*##•#**##»♦««*••*»»»•»• TEST 24 
|*DDCMP STRIP SYNC TEST 
(»5ET LU LOOP, SINGLE STEP 5 SYNCS, 
(#VERIFY THAT IN ACTIVE DOES NOT SET 
1 1 ##»*♦#######»»»##*«*••**••••**♦*•*• 



TEST 24 
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7^47 


1 5 4fe0 


0127 37 


000024 


2 4*9 


') 1 5 466 


0127 37 


0155 46 


?4 49 








2 45'"* 


015474 


1 04412 




24^1 


n 1 5 476 


012711 


004 000 


2452 


015502 


?Z^2 


n U 1 2 


2453 


! 55O6 


04737 


026 366 


24*> 4 


01551 2 


000005 




2 455 


1 5 5 1 




A n A /I R A 
U U U *' 3 I 


2456 


1 5520 


1 n441 4 




2457 


015522 






2 45s 


0155 24 


016104 


OOUU 


24^0 


015530 


4 2 7 4 


000277 




0155 34 






1 








24fe2 
ti t 




001401 






5 42 


104 040 




2 46 4 


015544 


I * 4 'J 












?46d 








2467 








246^ 
















1 








^ AT 
























2474 








2 475 


01 55 46 


0127 37 




2476 


015 554 


012737 


015636 


2477 








2478 


0.l55t>2 


10441 2 




2479 


015564 


0127 1 1 


A A A A A A 


2480 


015570 


012702 


A A A A 1 ^ 


2481 


015574 


u 4 f 3 ? 


026366 


24R2 


01 SfeOO 


000005 










A A AAA A 


24^4 


1 5606 


104414 




24ft5 


015610 


021244 




24«fc 


015612 


016104 


000004 


2487 


015616 


A A n r\A 

04270* 


000277 


24 8 ft 


015622 


01 2705 


OOOlOO 


24i^9 


015626 


120504 




2490 


015630 


001 401 




249 I 


015632 


3 04040 




2492 


015634 


1 04400 




249 3 








2494 
















2496 








2497 








249R 








2499 








2500 








2S(il 








2502 









001226 
uOi2U 



MOV 


I24»TSTN0 




HOV 












rtSTCLP 












MOV 


# 1 2 # R2 


■ c&ut' T!i OTP pno TVorniiT 


JSP 
5 


PC # SY NC 




L' « ( n ^ ii 1 


p 5 4 




BDMTT.K 
n u i*f u wfN 




jiibAi nUKLf 10 X n 1 P uv. 1 ^ un r nun^tiA 


021244 




) PQRT4«LU12 


MOV 


4CR1)»P4 


jPUT "FOUND" IH R4 


BIC 


»277»R4 


(CLEAR UNWANTED BITS 


CLR 


R5 


jPUT "EXPECTED" IN R5 


CMpB 


P5fP4 


lis ACTIVE CLEAR? 


BEQ 


IS 


|BR IF YES 


HLT 


40 


lEPROP ACTIVE IS NOT CLEAR 


SCOPE 




ySCOPE THIS TEST 



|»#*«tt«»*«tt«#»#»4*«*tftt*«**«tt TEST 25 ««*#»*«««tt««««*«»tt«tt»**«*«« 

|*DOCMP IN ACTIVE TEST 

f«SET LU LOOP, SINGLE STEP 5 SYNCS AND A NON-SYNC (301) 
f»VERIFY THAT IN ACTIVE IS SET 



I TEST 


25 




MOV 


#25,TSTNO 




MOV 


iTST26,NEXT 








|Rl CONTAINS BASE DMCll ADDRESS 


MSTCLR 




^MASTER CLEAR DMCll 


MOV 


•BITllrCRl) 


jSET LU LOOP 


MOV 


»12»R2 


ISAVE LU REG FOR TYPEOUT 


JSP 


PC, SYNC 


J SINGLE CLOCK 5 SYNC CHARACTERS 


5 

DATACLKf 


64 




RQMCLK 




|NEXT WORD IS INSfRUCTION, ROMCLK 


021244 




jP0RT4_LU12 


MOV 


4(Rn#R4 


l9UT "FOUND" IN R4 


BIC 


#277, R4 


jCLEAR UNWANTED BITS 


MOV 


iBIT6,R5 


IPUT "EXPECTED" IN R5 


CMPB 


R5,R4 


ylS ACTIVE SET? 


BEQ 


IS 


jBR IF YES 


HLT 


40 


lERROP ACTIVE IS NOT SET 


SCOPE 




j SCOPE THIS TEST 



I #»*«*#*««»#*«»««#**»»«««««» TEST 26 ««««#«««***«««•«*«*«>*«*«»«'« 

|#DDCMP IN ACTIVE TEST 

J*SET LU LOOP, SINGLE STEP 1 SYNC AND A NON-SYNC (301) 
|»VERIFY THAT IM ACTIVE DOES NOT SET 

I TEST 26 



DZDME WftCYll 3U(1046) ll-JUL-77 



D7,DME,I 


Pll 12 


-Mfty-77 


U1I8 


2503 


015636 


012737 


000026 


2504 


015644 


012737 


015724 


2505 








2506 


015652 


104412 




2507 


015654 


012711 


004000 


25oe 


0156*^0 


012702 


000012 


2509 


015664 


004737 


026366 


2510 


015670 


000001 




2511 


015672 


104415 


000024 


2512 


015676 


104414 




2-^13 


015700 


021244 




2514 


015702 


016104 


000004 


2515 


015706 


042704 


000277 


2516 


015712 


005005 




7 


ni 4 


1 70504 




2«il8 


015716 


001401 




2519 


015720 


104040 




2520 


015722 


104400 




2521 








2522 








2523 








2524 








7525 








2526 








2527 








2528 








2529 








2530 








2531 


015724 


012737 


000027 


2532 


015732 


012737 


016014 


2533 








2534 


015740 


104412 




25 35 


015742 


012711 


004000 


25 36 


OS 5746 


012702 


000013 


2537 


015752 


004737 


026366 


2538 


015756 


000002 




2539 


015760 


104415 


000034 


2540 


015764 


104414 




2541 


015766 


021244 




2542 


015770 


016104 


000004 


2543 


015774 


042704 


000277 


2544 


016000 


0J2705 


000100 


3545 


016004 


120504 




2546 


OU006 


001401 




2547 


016010 


504040 




2546 








2549 








2550 








2551 








2552 








2553 








2554 








2555 








2556 








2557 








*55S 
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BASIC RECEIVER TESTS 



TST27I 



TESTS 






MOV 


y26»TSTNO 




MOV 


»TST27,NEXT 








|R1 CONTAINS BASE OMCll ADDRESS 


MSTCLR 




^MASTER CLEAR DMCll 


MOV 


IBITll,(Rn 


I SET LU LOOP 


MOV 


112, P2 


iSAVE LU PEG FOR TYPEOUT 


J5R 


PC, SYNC 


(SINGLE CLOCK I SYNC CHARACTERS 


1 

DATACLK 


24 




RQMCLK 




fNEXT WORD IS INSTRUCTION, RQMCLK 


021244 




IP0RT4.LU12 


MOV 


4(R1),R4 


(PUT "FOUND" IN R4 


BIC 


1277, R4 


(CLEAR UNWANTED BITS 


CLR 


R5 


(PUT "EXPECTED" IN R5 


CMPB 


R5,R4 


(IS ACTIVE CLEAR? 


BEQ 


1ft 


(BR IF YES 


HLT 


40 


(ERROR ACTIVE IS NOT CLEAR 


SCOPE 




(SCOPE THIS TEST 



PAGE! 0068 



I TEST 27 
(#DDCMP IN ACTIVE TEST 

(♦SET LU LOOP, SINGLE STEP 2 SYNCS AND A NON-SYNC (301) 

(♦VERIFY THAT IN ACTIVE IS SET 



( TEST 27 
— — 

MOV 

MOV 



i27,TSTN0 
ITST30,NEXT 



MSTCLR 

MOV 

MOV 

JSR 

2 

DATACLK, 

ROMCLK 
031244 
MOV 
BIC 
MOV 
CMPB 
BEQ 
HLT 
SCOPE 



IBITll, (Rl) 
#12, R2 
PC, SYNC 



4(Rn#R4 

#277, P4 

«6IT6,RS 

R5#R4 

II 

40 



(Rl CONTAINS BASE DMCll ADDRESS 
(MASTER CLEAR DMCll 
(SET LU LOOP 

I SAVE LU REG FOR TYPEOUT 
(SINGLE CLOCK 2 SYNC CHARACTERS 



(NEXT WORD IS INSTRUCTION, 

(PQRT4,LU12 

(PUT "FOUND" IN R4 

(CLEAR UNWANTED BITS 

(PUT "EXPECTED" IN 
(IS ACTIVE SET? 
(BR IF YES 

(ERROR ACTIVE IS NOT SET 
iSCOPE THIS TEST 



ROMCLK PC«5304 



(*•«*»««#»«*«>«#«##*«»««««##« TEST 30 
(•IN CLEAR TEST 

|#SYNC UP RECEIVER AND TRANSMIT A CHARACTER 

(♦WAIT FOR IN ROY, THEN SET XK CLEAR 

(♦VERIFY THAT IN ACTIVE A-^D IN RDY ARE CLEARED 

I TEST 30 





MACyi i 


3 f 1 4 6 ) 


! J - JU] 


DZD^F.l 


PH 12 


• MAl(-77 


1 4 1 1 8 


2559 










016014 


012737 


A A A A 1 A 


2S6 1 


016022 


01 27 37 


016166 


2^62 








2563 


16030 


10 4412 




25b 4 


016032 


()1 2702 


A A A A 1 ^ 


?S65 


016036 


012711 


004000 


25ft6 


0! fi042 


047 37 


026534 


2567 


016046 


000301 




?568 


016050 


104415 


A A A A E ) 

000Q9 J 


2569 


016054 


104416 


/^ A A A A O 


25 7 


016060 


104414 




257 1 


016062 


021244 




2572 


01506 4 


016104 


A fi A A A A 

UUUUU4 


2573 


016070 






257 4 


016074 






25 75 


016100 


120504 




2576 


016102 


n A 1 A A 4 




257 7 


016104 


1 f\At\At\ 
I U HU 4 w 




25 7 8 


016106 






?579 


1 6 1 06 




AArtJAA 
U U U £ U w 


2580 


01611 4 






2581 


016116 






2582 


1 6 1 20 


104414 








021244 






016124 


0161 04 


000004 


2585 


016130 


0427 04 


000277 




01613 4 


U >'~ V W J 




259 ' 


1 6 1 36 






2588 


0161 40 


001401 




2^89 


016142 


1 U404U 




2590 


01614 4 






2591 


016144 


016104 


U u u U u 4 


2592 


016150 


042704 


000357 


25 9 3 


016154 


A A E n A C 




2594 


01 6156 


1 20504 




2595 


016160 


001401 




2596 


016162 


1 04040 




7597 


016164 


i /\ A A A A 




2598 








2599 








2600 








2601 








2602 








260 3 








26 04 








2605 








2606 








2607 








260S 


G 16 i 66 


01273? 


000031 


2609 


016174 


012737 


016302 


2610 








26U 


01620? 


104412 




2612 


016204 


012702 


000012 


2613 


016210 


012711 


004000 


261 4 


016214 


004737 


026534 



11140 PAGfc SO 

BASIC PECKIVEF TESTS 



PACEt 0069 



001226 
001216 



MOV 


»30» TST^JO 








MOV 


lTST3lrNEXT 












)R1 CONTAINS BASE DHCll ADDRESS 




MSTCLR 




fMASTER CLKAP DMCli 






MOV 


*l2f R2 


J SAVE REG ADDRESS Ih R2 FOR 


, TYPEQUT 


MOV 


#BITll# tPl) 


jSET LINE IIKIT LOOP 






J5R 


FC#CKAR 


iLuAD SILO Vi^ITH 3 SYNCS 






301 




;AND A NQN-SVNC (301) 






DATACLKi 


, 53 


(•SINGLE CLOCK THE DATA 








2 


• WAIT FOR I?.RDY 






ROMCIjK 




jNEXT WORD IS INSTRUCTIONi 


ROMCLK 


PCs5 304 


021244 




|P0RT4«LU 12 






MOV 


4CR1}«R4 


jPUT "FOUND" IN R4 






BIC 


l3S7f R4 


fCLEAR UNWANTED BITS 






MOV 


»BlT4rR5 


IPUT "EXPECTED" IN 


R5 




CMpB 


RSf R4 


lis INRDY SET? 






BEO 


1$ 








HIT 


40 


lERROR, INRDY IS NOT SET 






MOV 


#BIT7#4tRl) 


)LOAD P0RT4 






ROMCLK 




jNEXT WORD IS INSTRUCTION, 


ROMCLK 


PC«5304 


122112 




}SET IN CLEAR 






ROMCLK 




}NEXT vdORD IS INSTRUCTION, 


ROMCLK 


PCa5304 


021244 




»P0RT4.LU 12 






MOV 


4CRn#R4 


J PUT "FaUNO" IN R4 






BIC 


#277#R4 


fCLEAR UNWANTED BITS 






CLR 


RS 


fPUT "EXPECTED" IN R5 






CHPB 


R5|R4 


lis IN ACTIVE CLEAR? 






BSQ 


2t 








HLT 


40 


1 ERROR, In ACTIVE IS ™0T CL 


t£AR 




MOV 


4CR1)»R4 


jPUT "FOUND" IN R4 






BIC 


I3S7,R4 


yCLEAR UNMANTED BITS 






CLR 


RS 


I PUT "EXPECTED" IN R5 






CMpB 


R5rR4 


J IS INRDf CLEARED? 






BEO 


3$ 








HLT 


40 


lERROR, INRDY IS NOT CLEARED 




SCOPE 




} SCOPE THIS TEST 







r#*»**#«#«*#ww#«*»«wwwvww«ww TEST 31 

|«DDCHP BASIC RECEICER TEST 

j*SYNC UP RECEIVER AND SINGLE CLOCK THE CHARACTER 

;»VERIFY THAT IN RDY IS SET, AND THAT THE CHARACTER WAS RECEIVED 



I TEST 31 
, ......... 

TST31! MOV 
MOV 



tt3l*T5TN0 
iTST32,NEXT 



MSTCLR 
MOV 
MOV 
JSR 



ll2fR2 

#BITll,tRl) 

PCfCHAR 



fRl CONTAINS BASE DMCU ADDRESS 
JMASTER CLEAR DHCll 

fSAVE REG ADDRESS IN R2 FOR TYPEOUT 
;SET LIME UNIT LOOP 
JLOAD SILO WITH 3 SYNCS 



DZDWE 


MACYI 1 


30(1046) 


DZDVE.Pll 12 


-rtAY-77 


2615 


016220 


000000 


2616 


016222 


104415 


2617 


016226 


104416 


2618 


016232 


104414 


2619 


016234 


021244 


2620 


016236 


016104 


2621 


016242 


042704 




016246 


01 2?0S 


2673 


016252 


120504 


2624 


016254 


001401 


2625 


016256 


1O4040 


2626 


016260 




2627 


016260 


104414 


2628 


016262 


021204 


2629 


016264 


016104 


7630 


016270 


005005 


2631 


016272 


120504 


2632 


016274 


001401 


2633 


016276 


104ni0 


2634 


016300 


104400 


2635 






2636 






2637 






2636 






2639 






2640 






2641 






2642 






2643 






2644 






2645 


016302 


012737 


2646 


016310 


012737 


2647 






2648 


016316 


104412 


2649 


016320 


012702 


2650 


016324 


012711 


2651 


016330 


004737 


2652 


016334 


000125 


2653 


016535 


1 G««13 


2654 


016342 


104416 


2655 


016346 


104414 


2^56 


016350 


021244 


2657 


016352 


016104 


2658 


016356 


042704 


2659 


016362 


012705 


2660 


016356 


120504 


2661 


016370 


001401 


2662 


016372 


104040 


2663 


016374 




2664 


016374 


104414 


2665 


016376 


021204 


2666 


016400 


016104 


2667 


016404 


012705 


2668 


016410 


120504 


2669 


016412 


001401 


2670 


016414 


104010 



ll-JUL-77 



000053 
000002 



000020 



11140 PAGE SI 

BASIC RECEIVER TESTS 



PAGEl 0070 



000032 
016420 



000012 
004000 
026534 



000002 



000004 
000357 
000020 



000004 
000125 



001226 
001216 



TST32I 








fAND THE CHARACTER 


DATACLK, 


F 53 


} SINGLE CLOCK THE DATA 


TIMER, 


2 


jw/AIT FOR INRDY 


ROMCLK 




|NEXT WORD IS INSTRUCTION, ROMCLK 


021244 




rPQRT4,LU 12 


MOV 


4(R1),R4 


IPUT "FOUND" IN R4 


BIC 


1357, R4 


iCLEAR UNWANTED BITS 


MOV 


*BIT4,R5 


»PUT "EXPECTED" IN R5 


CMpB 


R5,R4 


fIS INRDY SET? 


BEQ 


It 




HLT 


40 


lERROR, INRDY IS NOT SET 


ROMCLK 




(NEXT WORD IS INSTRUCTION, ROMCLK 


021204 




JP0RT4-IN DATA 


J40V 


4(Rl)fR4 


|PUT "FOUND" IM R4 


CLR 


R5 


|PUT "EXPECTED" IN R5 


CMPB 


R5,R4 


fWAS A RECEIVED? 


BEQ 


2t 




HLT 


10 


lERROR, RECEIVED DATA IS WRONG 


SCOPE 




fSCOPE THIS TEST 



t »*«*«*«***««««««##»***«»**« TEST 32 «#«*•«*«»***«*•«*»««**•»»*« 

}*DDCMP BASIC RECEICER TEST 

r*SYNC UP RECEIVER AND SINGLE CLOCK THE CHARACTER 125 

I •VERIFY THAT IN RDY IS SET, AND THAT THE CHARACTER WAS RECEIVED 

1 1 



t TEST 


32 




MOV 


f32fT8TN0 




MOV 


»TST33,NEXT 








|R1 CONTAINS BASE DMCU ADDRESS 


MSTCLR 




jMASTER CLEAR DMCll 


MOV 


#13, R3 


(SAVE REG ADDRESS IN R2 FOR TYPEOUT 


MOV 


IBXTUrCRl) 


;S£T LINE UNIT LOOP 


JSR 


PC, CHAR 


rLOAD SILO WITH 3 SYNCS 






lAND THE CHARACTER 125 






iSTSGLE CLOCK THE DATA 


timerT 


2 


iwAIT FOR INRDY 


ROMCLK 




fNEXT WORD IS INSTRUCTION, ROMCLK PCi 


021244 




|P0RT4,LU 12 


MOV 


4CR1},R4 


jPUT "FOUND" IN R4 


BIC 


«3S7,R4 


fCLEAR UNWANTED BITS 


MOV 


fBXT4,R5 


I PUT "EXPECTED" IN R5 


CMPB 


R5#R4 


fIS INRDY SET? 


BEQ 


11 




HLT 


40 


}ERROR, INRDY IS NOT SET 


ROHCLK 




fNEXT WORD IS INSTRUCTION, ROMCLK PCi 


021204 




IP0RT4.1N DATA 


MOV 


4(Rn,R4 


IPUT "FOUND" IN R4 


MOV 


1135, R5 


IPUT "EXPECTED" IN fiS 


CMpB 


R5,R4 


llKAS A 125 RECEIVED? 


BEQ 


2i 




HLT 


10 


(ERROR, RECEIVED DATA 15 WRONG 



DZD*-*: MACYll 10(10461 ll-JUL-77 11 140 PAGL 52 

DSD»£.,P11 IS-WAY-TT |4tl9 BASIC RECFIVES TESTS 



PAGES 0071 



2b71 


(M6416 


1 044O0 




2672 








?673 








2674 








?675 








2676 








7.611 








2678 








2679 








2680 








2681 








2682 


016420 


012737 


000033 


2683 


016426 


012737 


016536 


2684 








268S 


016434 


104412 




2686 


016436 


012702 


000012 


2687 


016442 


012711 


004000 


2688 


016446 


004737 


026534 


2689 


016452 


000252 




2690 


016454 


104415 


000053 


2691 


016460 


104416 


000002 


2692 


0J6464 


104414 




2693 


016466 


021244 




2694 


016470 


016104 


000004 


2695 


016474 


042704 


000357 


2696 


016500 


012705 


000020 


2697 


016504 


120504 




2698 


016506 


001401 




2699 


016510 


104040 




2700 


016512 






2701 


01651 2 


104414 




2702 


016514 


021204 




2703 


016516 


016104 


000004 


2704 


016522 


012705 


000252 


2705 


016526 


120504 




2706 


016530 


00140J 




2707 


016532 


104010 




2708 


1,6534 


104400 




2709 








2710 








2711 








2712 








2713 








2714 








2715 








2716 








2717 








271 8 








2719 


016536 


012737 


000034 


2720 


01 6544 


012737 


016654 


2721 








2722 


016552 


104412 




2723 


016554 


012702 


000012 


2724 


016560 


012711 


004000 


2725 


016564 


004737 


026534 


2726 


016570 


000377 





TST33I 



TST34I 



fSCnPE THIS TEST 



TEST 33 #*####♦♦*»♦•#••«■*♦#»••*•#»* 

j*DDCMP BASIC HECEICER TEST 

t»S^NC UP RECEIVER AND SINGLE CLOCK THE CHAPACTEP 252 

(♦VERIFY THAT IN RDY IS SFT, AND THAT THE CHARACTER WAS RECEIVED 

I )»*•«»##♦#*♦♦#*####**»«»»«»*#*#»###•#*»•##•♦##*#***•«»»#♦•#•♦#» 



I TEST 33 



MOV 


#33* TSTNO 




MOV 


#TST34,NtXT 








jPl CONTAINS BASE DMCll ADDRESS 


MSTCLP 




jMASTER CLEAR DMCll 


MOV 


«12#R2 


iSAVE REG ADDRESS IN R2 FOR TYPEOUT 


MOV 


iBITllr (Rl) 


|SET LINE UNIT LOOP 


J5R 


PC, CHAR 


J LOAD SILO WITH 3 SYNCS 


2S2 




jkao THE CHARACTER 252 


DATACLKi 


, 53 


;SINGLE CLOCK THE DATA 


TiMERf 


2 


jWAIT FOR INRDY 


ROMCLK 




iNEXT WORD IS INSTRUCTION, ROMCLK PC; 


021244 




|P0RT4«LU 12 


MOV 


4(Bl),R4 


(PUT "FOUND" IN R4 


BIC 


•357, B4 


(CLEAR UNWANTED BITS 


MOV 


»BIT4,R5 


(PUT "EXPECTED" IN R5 


CMpB 


B5,R4 


lis INRDY SET? 


BEQ 


16 




HLT 


40 


(ERROR, INRDY IS NOT SET 


ROMCLK 




(NEXT WORD IS INSTRUCTIONf ROMCLK PC) 


021204 




fP0RT4»IN DATA 


MOV 


4CRl)fR4 


■PUT "FOUND" IN B4 


MOV 


n52,R5 


(PUT "EXPECTED" IN R5 


CMpB 


RS,R4 


JWAS A 252 PECEIVED? 


BEQ 


2S 




HLT 


10 


(ERROR, RECEIVED DATA IS WRONG 


SCOPE 




, SCOPE THIS TEST 



(«««#««»«*««««««**«*#*«»#««« TEST 34 *«******tt«tt#««««tt*tt«*tt«tt««* 

(#DDCMP BASIC RECEiCER TEST 

|#SYNC UP RECEIVER AND SINGLE CLOCK THE CHARACTER 377 

(♦VERIFY THAT IN ROY IS SET, AND THAT THE CHARACTER WAS RECEIVED 



I TEST 34 
I --------- 

MOV 
MOV 



»34fTSTNO 
»TST35,NEXT 



HSTCLF 

MOV 

MOV 

JSR 

377 



il3rR2 

• BITU,(Rl) 

PC, CHAR 



(PI CONTAINS BASE DMCtl ADDRESS 
(MASTER CLEAR DMCll 

(SAVE REG ADDRESS IN R2 FOR TYPEOUT 
(SET LINE UNIT LOOP 
(LOAD SILO WITH 3 SYNCS 
(AND THE CHARACTER 377 



DZDHE 


MRCyll 


30(1046) 


li-JUL 


•77 IIUO 


PAGE 53 








PAGE? 


DZDME.Pll 12 


-MAY-77 


14118 


BASIC RECEIVER 


TESTS 








2727 


016572 


104415 


000053 






DATACLK, 


r 53 


(SINGLE CLOCK THE DATA 




2728 


016576 


104416 


000002 






TIMER, 


2 


(WAIT FOR INRDY 




2729 


016602 


1 04414 








ROMCLK 




(NEXT V*ORD 15 INSTRUCTION, ROMCLK 


PCa53Q4 


2710 


016604 


021244 








021244 




(P0RT4.LU 12 




2731 


016606 


016104 


000004 






MOV 


4CR1},R4 


(PUT "FOUND" IN R4 




2732 


0R6I2 


042704 


000357 






BIC 


I357,R4 


(CLEAR UNWANTED BITS 




2733 


016616 


U12705 


000020 






MOV 


|BIT4,R5 


(PUT "EXPECTED" IN R5 




2734 


016622 


120504 








CMPB 


R5,R4 


(IS INRDY SET? 




2735 


016624 


001401 








BEQ 


IS 






2736 


016626 


104040 








HLT 


40 


(ERROR, INRDY IS NOT SET 




2737 


016630 








111 










2738 


016630 


104414 








ROMCLK 




(NEXT WORD IS INSTRUCTION, ROMCLK 


PC»5304 


2739 


016632 


021204 








021204 




|P0PT4«IN DATA 




2740 


016634 


016104 


000004 






MOV 


4eRl),R4 


(PUT "FOUND" IN R4 




2741 


016640 


012705 


000377 






MOV 


♦377, R5 


(PUT "EXPECTED" IN R5 




2742 


016644 


120504 












,WBe ft xft RecEIVED? 




2743 


016646 


001401 








BEQ* 


2l' 






2744 


016650 


104010 








HLT 


10 


(ERROR, RECEIVED DATA IS WRONG 




2745 


016652 


104400 






281 


SCOPE 




(SCOPE THIS TEST 




2746 


















2747 




















274B 
















2749 












(•DDCMP 


DATA TEST 






2750 












I»THI8 TEST SINGLE 


STEPS A BINARY COUNT PATTERN 




2751 












(•CHECKING EACH CHARACTER AS IT IS PECEIVED 




2752 












( 1 ♦•#####»###»#•##»#»»##»#♦#»*>#«#««#####•##♦##»###»##*####•####• 


2753 




















2754 












( TEST 


35 






2755 




















2756 


016654 


012737 


000035 


001226 


TST35I 


MOV 


laSftSTNQ 






2757 


016662 


012737 


017004 


001216 




MOV 


*TST36fNCXT 






2758 
















(Rl CONTAINS BASE DMCll ADDRESS 




2759 


016670 


104412 








MSTCLR 




(MASTER CLEAR DMCll 




2760 


016672 


005037 


027152 






CLR 


SCHAR 


(START BINARY COUNT AT ZERO 




2761 


016676 


005037 


027154 






CLR 


STUFLG 


(CLEAR BITSTUFF FLAG 




2762 


016702 


005002 








CLR 


R2 


(R2 IS "EXPECTED" DATA 




2763 


016704 


012703 


000073 






MOV 


#73, P3 


(R3 IS CHARACTER COUNT 




2764 


016710 


012711 


004000 






MOV 


iBITllrCRU 


(SET LINE UNIT LOOP 




2765 


016714 


004737 


026712 






JSR 


PCSILOLD 


(LOAD SILO WITH COUNT PATTERN 




2766 


016720 


104415 


000043 






DATACLK, 


, 43 


(SYNC RECEIVER AND GET IT ACTIVE 




2767 


0J6724 


104415 


000730 




IM 


DATACLK, 


, 730 


(CLOCK IN 73 CHARACTERS 




2768 


016730 


00473? 


027156 




4$S 


JSR 


PC, INRDY 


(WAIT FOR IHRDY 




2769 


016734 


104414 








ROMCLK 




(NEXT WORD IS INSTRUCTION, HOf«CLK 


PC»i?0« 


2770 


016736 


021204 








02120^ 




jPDRT4*IN DATA 




277! 


016740 


016104 


000004 






MOV 


4CR! ) ,R4 


(PUT "FOUND" IN R4 




2772 


0U?'44 


010205 








MOV 


R2,R5 


(PUT "EXPECTED" IN R5 




2773 


01 6746 


120504 








CMPB 


R5f S4 


}IS DATA CORRECT? 




2774 


016750 


001401 








BEQ 


29 


(BR IF YS5 




2775 


016752 


1 04010 








HLT 


10 


(DATA ERROR 




2776 


016754 


O05202 








INC 


R2 


jNEXT CHAPACTSR 




2777 


01 6756 


022702 


000400 






CMP 


»400»R2 


(ALL DONE? 




2776 


016762 


001407 








BEQ 


3$ 


(BR IF YES 




2179 


016764 


005303 








DEC 


R3 


fPECPEMENT CHARACTER CQ^NT 




27 BO 


ni S-.76S 


001 360 








BNE 




?8R IF SILO NOT EHPTY 






01, «7 7Q 


^1^4737 


026712 






JSR 


PCf SILQLD 


-LO^'D STLQ *tITH HPPE OF CDU«^T P.^I' 




7'^^7 


' ■? 7 4 


nt 27 3 


000073 






wov 


«73f ^'a 







DZDMP MACYll 30Ci04b) ii-guL-77 lli40 PAGE 54 PAGEl 0073 

DZDf^E.Plt 12-MAy-77 14118 BASIC ^^ECEiVEP TESTS 



27«3 


1 7 


00075 1 




27fl4 


01 7o02 


1 04400 












27fl6 








2787 








278B 








2"S9 








2790 








2791 








2792 








2793 








2794 








2795 








2796 








2797 


017004 


012737 


, 000036 


2798 


017012 


012737 


017144 


2799 








2800 


Ol7o20 


104412 




2flOl 


Ol7p22 


05037 


027152 


2S02 


01 7o26 


005037 


027154 


2R03 


Ol7o32 


005002 




28 4 


Ol7o34 


012703 


0uQu7 J 


2805 


0t7o40 


00501 1 




28 0* 


01 7o42 


012761 


000u40 


28o7 


0t7t)50 


104414 




28o8 


Ol7o52 


122112 




2809 


01 7o54 


004737 


026712 


2810 


Ol7o60 


104415 


000043 


28U 


Ol7o64 


104415 


000730 


2812 


01 7o7i3 


004737 


027156 


2813 


01 7074 


104414 




281 4 


017076 


021204 




2815 


017100 


016104 


000004 


2816 


017104 


010205 




2817 


017106 


120504 




2818 


017110 


001401 




2819 


017112 


104010 




2920 


017114 


005202 




2821 


Ol7Hft 


022702 


000400 


2822 


017122 


001407 




2823 




005 30 3 




2824 


017126 


001 360 




2825 


1 7 1 3 


004737 


026712 


2826 


017134 


012703 


000073 


2^?7 


01 7 1 40 


00075 I 




2828 


017142 


104400 




28 29 








2930 








2P31 








2832 








2833 








2834 








2835 








?83b 








2S37 








2838 









BR 

SCOPE 



iCQNTINUE 

jSCOPE THIS TEST 



Itl 

4$i 



3«l 



I »*##»#»#*#**«#♦♦****#*###»# TEST 36 »»********#*#»**#»####*##«# 

j*DDCMP DATA TEST 

I«TH1S TEST SINGLE STEPS A BINARY COUNT PATTERN 
jttCHECKIMG EACH CHARACTER AS IT IS RECfclvED 
,«THIS TEST is EXACTLY THE SAME AS ThF LAST TEST, 
j#EXCEPT LINE UNIT LOOP IS SET IN Ltl REGISTER 12 



1 TEST 


36 




HOV 






HOV 


ITaT37 .NEXT 










KSTCLR 






CLR 


5CKAR 


fAT&DT nTM&DV ^nilMfp hti TPnrt 
JOiAKi BjkNAKl uUUNf AT £EiKU 


CLR 


STUFLG 




CLR 




Ji^i IB "bAr&CTEjD* UAXA 






J Hi xs wnApACTbP CUUnT 


CLR 


I Rl J 


^ULbAK U\J JLjODP IN MAINT REG 


MOV 




■ T,n&n BriDqiA 
I uUAL' rUnT4 


ROMCLX 




|NEXT WORD IS INSTRUCTION, ROMCLK PC«5304 


122112 




|8ET LU LOOP IN LU REG 12 


J5R 


PCfSXLOLD 


JLOAD SILO MITH COUNT PATTERN 


DATACLK( 


t 43 


jSlfNC RECEIVER AND GET IT ACTIVE 


DATACLK, 


r 730 


ICLOCK IN 73 CHARACTERS 


JSP 


PCINPDY 


|WAIT FOR INRDlf 


ROMCLK 




jNEXT WORD IS INSTRUCTION, ROMCLK PCb5304 


021204 




|P0RT4.IN DATA 


HOV 


4CRt}»R4 


,PUT "FOUND" IN R4 


MOV 


R2#R5 


»PgT "EXPECTED" IN R5 


CHPB 


R5f R4 


lis DATA CORRECT? 


8EQ 


29 


J BR IF YES 


HLT 


10 


;DATA ERROR 


INC 


R2 


jNEXT CHARACTER 


CMP 


»400f R2 


TALL DONE? 


BEQ 


3» 


;BR IF YES 


DEC 


R3 


jDECREMENT CHARACTER COUNT 


BNE 


4t 


»BR IF SILO NOT ErtPTY 


JSR 


PCrSILOLD 


fLOAD SILO WITH MORE OF COUNT PATTERN 


MOV 


#73, R3 


f RELOAD CHARACTER COUNT 


BR 


1» 


iCONTINUE 


SCOPE 




f SCOPE THIS TEST 



I TEST 37 **»«*«««*#••*##«***«*«#»•«« 

IftTPANSMITTER MARK TEST 

|*8INGLE CLOCK 3 SYNCS AND A 301 AND 20 EXTRA 

l»CLOCK TICKS, VERIFY THAT A 301, A 377 AND A 377 

j»WERS RECEIVED INDICATING THAT THE TRANSMITTER WENT 
J#T0 A MARK STATE FOR 16 BITS WHEN OUT SILO WAS EMPTY 
1 f 



DZDME 


HACYll 


30(1046] 


DZDME.I 


Pll 12 


-MAY-77 


2839 






2840 






2841 


017144 


012737 


2842 


017152 


012737 


2843 






2844 


017160 


104412 


2845 


ni7i62 


012711 


2846 


017166 


004737 


234? 


017172 


00030! 


2848 


017174 


104415 


2849 


017200 


004737 


2850 


017204 


104414 


2851 


017206 


021204 


2852 


017210 


016104 


2853 


017214 


012705 


2854 


017220 


120504 


2855 


017222 


001401 


2856 


017?24 


104010 


2857 


017226 


004737 


2858 


017232 


104414 


2859 


017234 


021204 


2860 


017236 


016104 


2861 


017242 


012705 


2862 


017246 


120504 


2861 


01 7250 


001401 


2864 


017252 


104010 


2865 


017254 


004737 


2866 


017260 


104414 


2867 


0J7262 


021204 


2868 


017264 


015104 


2869 


017270 


012705 


2870 


017274 


120504 


2871 


017276 


001401 


2872 


017300 


104010 


2873 


017302 


104400 


2874 






2875 






2876 






2877 






2573 






2879 






2880 






28fll 






2882 






2883 






2884 






2885 


017304 


012737 


2886 


017312 


012737 


2687 






28S8 


017320 


104412 


2889 


017322 


032737 


2890 


017330 


001004 


2891 


017332 


032737 


2992 


017340 


001451 


2893 


017342 


005011 


2894 


017144 


012761 
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000037 001226 
017304 001216 



004000 
026534 



TST37I 



000073 
027156 



000004 
000301 



000004 
000377 



027156 



000004 
000377 



2$l 



t TEST 


37 






HOV 


#37,TSTNO 






HOV 


«TST40,NEXT 










fRl CONTAINS BASE DMCll ADDRESS 




M8TCLR 




I MASTER CLEAR DMClt 




MOV 


#BITll,(Rl) 


|SET LINE UNIT LOOP 




JSR 


PC, CHAR 


(LOAD SILO WITH 3 SYNCS 




301 




jAND A 301 




DATACLK, 


. 73 


fCLOCK THE 301 iH AriD 20 EXTRA IXC 


IKS 


JSR 


PCflNRDY 


jWAIT FOR INRDY 




ROMCLK 




|NEXT WORD IS INSTRUCTION, ROMCLK 


PC«5304 


021204 




fP0RT4.IN DATA 




HOV 


4CRn,R4 


jPUT "FOUND" IN R4 




HOV 


1301, R5 


J PUT "EXPECTED" IN R5. 




CMPB 


R5#R4 


|WAS A 301 RECEIVED? 




BEQ 


11 






HLT 


10 


TERROR FIRST CHARACTER INCORRECT 




JSR 


PCINRDY 


I WAIT FOR INRDY 




ROMCLK 




yNEXT WORD IS INSTRUCTION, ROMCLK 


PCa5304 


021204 




IP0RT4«IN DATA 




HOV 


4CRl)rR4 


jPUT "POUND" IN R4 




MOV 


#377, R5 


|PUT "EXPECTED" IN R5 




CMPB 


R5,R4 


fWAS A 377 RECEIVED? 




BSa 


2t 




HLT 


10 


tERROR, 377 WAS NOT RECEIVED 




JSR 


PCINRDY 


yWAIT FOR INRDY 




ROMCLK 




fNEXT WORD IS INSTRUCTION, ROHCLK 


PC«5304 


021204 




}PQRT4.IN DATA 




HOV 


4CRn,R4 


J PUT "FOUND" IN R4 




MOV 


•377, R5 


IPUT "EXPECTED" IN R5 




CMPB 


R5,R4 


jWAS A 377 RECEIVED? 




BEQ 


38 




HLT 


10 


f ERROR, 377 WAS NOT RECEIVED 




SCOPE 




J SCOPE THIS TEST 





TEST 40 

|»CABLE TURNAROUND TEST 
:»CLEAS LINE UNIT LOOP; SET DTR 
i*VERIFY THAT MODEM READY IS SET 
fttCLEAR DTR, VERIFY THAT MRDY IS CLEARED 
1 1 tt*«******»*«#***»*««#**»ft#«»«tt«*«*»**«» 







J TEST 


40 




000040 


001226 


TST40t MOV 


t40,TSTNO 




017466 


001216 


MOV 

MSTCLR 


|T5T4l,NEXT 


|R1 CONTAINS BASE DMCU ADDRESS 
(MASTER CLEAR DMCU 


020000 


0OU66 


BIT 


tBIT13,STATl 


lis LINE UNIT M82027 






BNE 


. + 12 


|BR IF YES CDO TEST EVEN IF NO LOOP-BACK 


040000 


001366 


BIT 


IBIT14,STAT1 


lis TURNAROUND CONNECTOR ON? 






BEQ 


2t 


ISKIP TEST IF NO 






CLR 


CRD 


iCLEAR LINE UNIT LOOP 


000100 


000004 


MOV 


•100,4CR1} 


J LOAD paRT4 
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2B95 


017 352 


10 4414 








HUMt. Un 






2896 


017 354 


122113 












f SET DTP 




1 7 56 


10 4 416 


ft rt A T 












2P9R 


17 362 


1 4 414 








RQMCLK 




tN^KT WDDO T fi <IT BUT T T HN . RDMrLK PrattlOA 


Jfl 99 


017^64 


2126 4 














290 


It 1 7 366 


U 1 6 1 U 4 


000004 








4( Pi ) P4 


• DiiT wpniiRinH Tw DA 
ffUi r'JUNU 111 


2901 


01737? 


O'' 4 f 0*t 










1 223 f P4 




2902 


017 376 


01 27 05 


A ft A 1 1 A 

0001 I U 






Mnu 


9 1 lOf R5 




290 3 


017 402 


1 20504 








CMpB 




J 4 O npu I OIL 1 r 


2904 


017404 


U 1 4 U 1 








BEQ 


1 $ 




2905 


017406 


104011 














2906 


017 410 


005061 


000004 




15 1 


CLR 


4CR1 J 




29o7 












ROMCLK 




y NEX f isORD IS INSTRUCTION, RQMCLK PCb5304 




" ! 7 1 


122113 








122113 




jCLEAR DTR 


39f*9 


nl 7 A50 




000009 

U U V V V £ 








2 




In 


nl 7 ^ d 


i 04 41 4 








POMCLK 




jNEXT WORD IS INSTPUCTIOM, ROMCLK PC85304 


991 1 


01 7d76 


021 264 








021264 




f PDRT4.LU13 


-lOl •> 


017430 




nfloflod 

UU U V U *f 






MOV 


4(R1 ) r R4 


|PUT "FOUND" IN R4 


99t 3 


0174 34 


042704 


000391 

U U U * A J 






BIC 


1223 1 R4 


iCLEAR UNWANTED BITS 


2914 




005005 








CLR 


R5 


fPUT "EXPECTED" IN R5 


2915 


017 442 


032737 


020000 


OOt 366 




BIT 


#BIT13» STATl 


|IS LINE UNIT MB202? 


2916 


017450 


00 1 do9 








BEQ 


1 16 


f BR IF NO 


2917 


017 452 


052705 


A An n 1 A 






BIS 


tBIT3#R5 


jMBDY SET ON MB202 


29 1 9 


1 7 456 


120504 








CMPB 


R5rR4 


lis MRDY CLEAR? 




017 460 










BEQ 


2$ 




2920 












Hit 


11 


lERRQR, MRDY NOT CLEAR 


2921 


017464 


104400 






2$t 


SCOPE 




F SCOPE THIS TEST 


2922 


















2923 


















2924 














2925 












r#CABLE 


TURNAROUND TEST 




2926 












|#CLEAB LINE UNIT LOOP, 


LOAD OUT DATA SILO 


2927 












l#VEBIFY THAT ALL MODEM 


SIGNALS ARE SET 


297fi 














2930 












1 TEST 


41 




29 31 












I— 








1 7 4o6 


012737 


OOOOd 1 


001226 


TST4 1 1 


MOV 


«41,TSTN0 




2933 


017474 


012737 


017632 


001216 




MOV 


#T5T42,NEXT 




2934 
















|R1 CONTAINS BASE DMCll ADDRESS 


2935 


017502 


104412 








MSTCLR 




»MASTER CLEAR DMCll 


29 36 


1 7504 


032737 


A A A A ft 


001366 




BIT 


fBIT13#STATl 


flS LINE UNIT M8202? 


2937 


017512 


001004 








BNE 


, + l2 


jBR IF YES CDO TEST EVEN IF NO LOOP-BACK 


2938 


0l7«;i4 


032737 


040000 


001366 




BIT 


«BIT14f STATl 


lis TURNAROUND CONNECTOR ON? 


2939 


1 7522 


001 442 








BEQ 


1* 


»SKIP TEST IF NO 


2940 


0175 24 


012711 


A A A A ft ft 

0v4u0U 






MOV 


#BITU#CRU 


;SET LINE UNIT LOOP 


2941 


01 7S 30 


01 27 61 


A A A 1 Aft 
0001 00 


A A A A A A 




MOV 


tlOO, 4(R1} 


fLOAD PDRT4 






t n A A 4 A 

1 0't41 4 








BOMCLK 




|NEXT WORD IS INSTRUCTION, ROMCLK PCb5304 


^943 


017^40 


122113 








122U3 




iCLEAR ALL MODEM SIGNALS, EXCEPT DTR 


2944 


017542 


104416 


000002 






TIMER* 


2 


fWAIT 


2945 


01 7546 


012761 


OOOOOl 


000004 




MOV 


llr4tRn 


ILOAD P0RT4 


2946 


017554 


104414 








RQMCLK 




tNEXT WORD IS INSTRUCTION, ROMCLK PCs5304 


2947 


01 7S56 


122111 








122UI 




ISET SOM 


2949 


017^60 


004537 


027620 






JSR 


RSfMESLD 


iFILL OUT DATA SILO 


2949 


017564 


030102 








MESDAT 




fWITH 64 CHARACTERS 


2950 


01 7566 


00100 








64. 
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2951 


017570 


013700 


n nn AK A 






MOV 


I50#R0 


(PREPARE FOR DELAY 


2952 


017574 


nnsni 1 








CLR 


(RU 


jCLEAR LINE UNIT LOOP 


2953 


017576 








2»l 








2951 


017576 


0441 4 








ROMCLK 




iNEXT WORD 15 INSTRUCTION, ROMCLK PC«5304 


2955 


01 7600 










021264 




IPQRT4.LU13 


2<»'56 


017f,02 




A A A A A A 






MOV 


4CRn*P4 


|PUT "FOUND" IN P4 


2957 


017606 


042 704 


000223 






BIC 


l223fR4 


jCLEAR UNWANTED BITS 


295fl 


017612 


01 2705 


000154 






MOV 


1154, R5 


fPUT "EXPECTED" IN R5 


2959 


017616 










CMPB 


R5fR4 


^COMPARE EXPECTED AND FOUND 


2960 


01 7620 


001 40 3 








BEQ 


11 


(BR IF OK 


2961 


0l7ft22 


005 ^00 








DEC 


BO 


(DEC DELAY COUNT 


29t,2 


017624 


001364 








BNE 


2» 


|BP IF NOT ZERO 


2063 


Ol7fi26 










HLT 


11 


TERROR, ALL SIGNALS ARE NOT SET 


2964 


017630 


104400 






l$l 


SCOPE 




(SCOPE THIS TEST 


2965 
















i 5bi> 


















2967 












f TEST 42 


2968 












!*TEST OF CRC OPERATION 




2969 












f ttUSiNG 


THE CRC16 POLlfNOMIAL, SINGLE CLOCK THE CHARACTER 


2970 












1*0* VERIFY THE LSB OF THE BCC ON EACH SHIFT 


2971 












|»TE8T 


TBANSMITTEP FIPSl 


THEN THE RECEIVER BCC 


2972 














2973 


















2974 












1 TEST 


42 




2975 


















2976 


017632 


01 2737 


000042 


001226 


TST42f 


MOV 


f42,TSTH0 




2977 


017640 


0127 37 


020146 


001216 




MOV 


ITST43rN£XT 




2978 


017646 


0127 37 


017662 


001220 




MOV 


«646f LOCK 




2979 
















(Rl CONTAINS BASE DMCll ADDRESS 


2980 


017654 


1044i2 








MSTCLB 




(MASTER CLEAR DMCll 


2981 


017656 


012711 


004000 

U U t (J V u 






MOV 


IBITllMRl) 


(SET LU LOOP 


29R2 


017662 


0047 37 


027662 




64$1 


JSR 


PCCLPIO 


(CLEAR BCC REGISTERS 


29»3 


01756% 


5 
U U 9 U V# V 








CLR 


RO 


(START SHIFT COUNTER AT ZERO 


2984 


017670 


012737 


1 20001 


0273i6 




MOV 


lCRC16fXP0LY 


(LOAD POLYNOMIAL FOR SOFTWARE BCC 


29«5 


017676 


0127 37 


oooOnn 

U U V V/ u u 


017736 




MOV 


#0,668 


(LOAD CHAR FOR SOFTWARE BCC 


2936 


017704 










CLR 


671 


(CLEAR OLD SOFTWARE BCC 


2987 


017710 


047 37 


027 322 






JSR 


PCBCCLD 


(LOAD OUT SILO WITH 2 SYNCS 


29S9 


017714 


V M u u u u 













(AND THE CHARACTER 


2989 


017716 










DATACLK 


1 21 


(GET TRANSMITTER ACTIVE 


2990 


017722 


104415 


ooooni 
u u u u V 1 




65St 


DATACLK 


» 1 


(SHIFT BCC ONCE 


2991 


017726 


005 200 








INC 


RO 


(BUMP SHIFT COUNT 


2992 


017730 


0045 37 


n "i 7 ^ 1 T 






JSR 


R5,SIMBCC 


(CALCULATE SOFTWARE BCC LSB 


2993 


017734 


n n n n n f 

V U u u 1 








1 




jDNE SHIFT 


3994 


017736 


00000 






66$t 







(DATA CHARACTER 


2995 


0177*0 


000000 






6781 







(OLD BCC 


?99fc 


017742 


10 3405 








BC5 


6i$ 


(BR IF SOFT BCC LSB IS SET 


299) 


011744 


« nlftni 


2 7 13 4 






JSR 


PCGEiau 


(uET HARDWARE TPANSMITTER BCC l.BV< 


2998 


017750 


1 3 Q 








BCC 


69$ 


(BP IF HARD BCC LSB IS CLEAS 


S999 


01 7752 


10401 2 








HLT 


12 


(ER'^OR, BCC LSB IS SET 


3onO 


017754 


000404 








BP 


69t 


(CONTINUE 


BOCU 


01 7756 


004737 


027434 






JSR 


PCGETQO 


(GET HARDWABS TRANSMITTER 9CC LSB' 


3^02 


ni7762 


1 03401 








BCS 


69( 


(RR If HARD BCC LSB IS SET 


300 3 


PI 7764 


1D40U 








KLT 


16 


I^.RROR, HARD BCC LSB IS CLEAP 


3 no 4 


01 7766 
















3005 


" 1 7766 




017736 






ROP 


66t 


iSHirT SOFT DATA 


3 0^1^ 


017772 




027.120 


01774C! 








|E,OaD OLD SOFT ^CC 
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3007 


020000 


022700 


000010 


aoofl 


020004 


001346 




3O09 


020006 


104401 




30 J 


020010 


012737 


020016 


301 I 


020016 


O04737 


027662 


30 12 


020022 


005000 




301 3 


020024 


01 273? 


1 20001 


3014 


020032 


0127 37 


OOOOOO 


3015 


020040 


005037 


020074 


3016 


020044 


004737 


027322 


3017 


020050 


000000 




3018 


020052 


104415 


GG0032 


301<» 


020056 


104415 


OOOOOl 


3020 


020062 


005200 




30?1 


020064 


004537 


027212 


3022 


020070 


000001 




3023 


02^072 


OOOOOO 




3024 


020074 


000000 




3025 


020076 


1 03405 




3026 


020100 


004737 


027446 


3027 


020104 


1 030O6 




302f> 


020106 


10401 3 




3029 


0201 10 


000404 




3030 


020112 


0047 37 


027446 


3031 


0201 1 6 


103401 




3032 


020120 


104017 




3033 


020122 






3034 


020122 


006037 


020072 


3035 


020126 


013737 


027320 


1036 


020134 


2 2 7 G G 


GOGOl 


3037 


020140 


001346 




3038 


020142 


104401 




3039 


020144 


104400 




3040 








3041 








3042 








3043 








3044 








3045 








3046 








3047 








304a 








3049 








3050 








3051 


020146 


012737 


000043 


30S2 


020154 


012737 


020462 


3053 


020162 


1 2737 


020176 


3054 








3055 


020170 


104412 




3056 


020172 


012711 


004000 


3057 


020176 


004737 


027662 


3058 


020202 


005000 




3059 


020204 


012737 


120001 


3060 


020212 


P12737 


000377 


3 06 i 


Oz0220 


003^37 


0202S4 


3062 


020224 


004737 


027322 



027316 



73$t 
74SI 



75SI 



TST43t 



CHP 


# 1 » RC 


jDONE YKT? 


BN£ 


658 


JBR ir NOT DONE 


SCOPl 




fSCOPE SUBTEST C5W09»1) 


Mpy 


S7 1 s J liOCf" 


!NEW SCOPEl 


JSR 


Of ^ T D T n 
rC f CLpID 


1 CLEAR BCC REGISTERS 


CLP 


HO 


1 START SHIFT CDUWT|;R' AT ZERO 






thdfkD POLYNOMIAL FOR SOFTWARE BCC 


Huv 


CO f 7 3S 


;LOAD CHAR FOR SOFTWARE BCC 


CLR 


74* 


(CLEAR OLD SOFTWARE BCC 


JSR 


PCrBCCLD 


I LOAD OUT SILO WXTh 2 SYNCS 







|AhD THE CHARACTER 






iGET RECEIVER ACTIVE 


DATACLK 


1 


t SHIFT BCC ONCE 


INC 


RO 


fBUMP SHIFT COUNT 


JSP 


btt aTU&^^ 


1 CALCULATE SOFTWARE BCC LSB 


1 




lONE SHIFT 







I DATA CHARACTER 







}OLD BCC 


BCS 


7SI 


yBR IF SOFT BCC LSB IS SET 


JSR 




JQET HARDWARE RECEIVER BCC LSB 


BCC 


76$ 


ton It HARU DCs. LSB IS CLEAR 




1 3 


fbRRORf BCC LSo IS SET 


BR 


761 


(CONTINUE 


JSR 


PCiGETQI 


fGE!T KARQUARE RPTETVFB tiPP IJlfi 

f wC^ ft n A nt/ in A ft D ^bVab^fCiR Dvv hntO 


BCS 


76t 


rBR IF HARD BCC L3B IS SET 


HLT 


17 


1 ERROR, BCC LSB IS CLEAR 


ROR 


73t 


I SHIFT SOFT DATA 


MOV 


CALBCCf74| 


fLQAD 'old SOFT BCC 


CMP 


llOfHO 


iDOHE YET? 


BNE 


73$ 


|BR IF NOT DONE 


SCOPl 




} SCOPE SUBTEST (5H09«1} 


SCOPE 




; SCOPE THIS TEST 



I •#««*«««««•*«*««*«#•»•*«*#« TEST 43 »***«***«*«***««**««»****«* 

|*TeST OF CRC OPERATION 

(#USING THE CRC16 POLYNOHIALf SINGLE CLOCK THE CHARACTER 
»*377, VERIFY THE LSB OF THE BCC ON EACH SHIFT 
I#TEST TRANSMITTER FIRST THEN THE RECEIVER BCC 

; !•#*«•*#«««»**•*»•#»»«««**»«#•»•**««*»***•«««*«*•##*****«*««•«» 

I TEST 43 

MOV «43rTSTNO 
MOV |TST44fNEXT 



020252 



MOV 

MSTCLR 

wOV 
JSR 
CLR 
MOV 
MOV 
CLR 
JSR 



164$, LOCK 



fBIfi i, (Ri) 

PCfCLRIO 

RO 

«CRC16«XP0LY 

•377#66$i 

67S 

PC16CCLD 



TRI CONTAINS BASE DMCH ADDRESS 

f MASTER CLEAR DMCll 

}5£T LU LOur 

I CLEAR BCC REGISTERS 

I START SHIFT COUNTER AT ZERO 

jLOAO POLYNOMIAL FOR SOFTWARE BCC 

}LOAD CHAR FOR SOFTWARE BCC 

•CLEAR OLD SOFTWARE BCC 

ILOAD OUT SILO WITH 2 SYNCS 
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3063 


020230 


000377 






377 




3064 


020232 


1^4415 


000021 




DATACLK 


1 21 


3065 


020236 


104415 


OOOOOl 


65$t 


DATACLK 


f I 


3066 


020242 


005200 






INC 


RO 


3067 


020244 


004537 


027212 




JSR 


RSrSIMBCC 


3068 


020250 


OOOOOl 






1 




^069 


020252 


OOOOOO 




66$l 







3070 


020254 


OOOOOO 




67$l 







3071 


020256 


103405 






BCS 


66$ 


3072 


090260 


004737 


027434 




JSR 


PCGETQO 


3073 


020264 


103006 






BCC 


69$ 


3074 


020266 


104012 






HLT 


12 


3075 


020270 


000404 






BR 


69$ 


3076 


020272 


004737 


027434 


68$| 


JSR 


PCiGETQO 


3077 


020276 


103401 






BCS 


69$ 


3079 


020300 


104016 






HLT 


16 


3079 


020302 






69$t 






30R0 


020302 


006037 


020252 




RQR 


66$ 


3081 


020306 


013737 


027320 


020254 


MOV 


CALBCC,67$ 


3082 


020314 


022700 


000010 




CMP 


llOfRO 


3083 


020320 


001346 






BNE 


65$ 


3084 


020322 


104401 






SCOPl 




3085 


020324 


012737 


020332 


001320 


MOV 


t?l$tLOCK 


3086 


020332 


004737 


027662 


71$l 


JSR 


PCfCLRIO 


3087 


020336 


005000 






CLR 


R« 


3088 


020340 


012737 


120001 


027316 


MOV 


tCRC16,XP0LY 


3089 


020346 


012737 


000377 


020406 


MOV 


1377,73$! 


3090 


020354 


005037 


020410 




CLR 


74$ 


3091 


020360 


004737 


027322 




JSR 


PCfBCCLD 


3092 


020364 


000377 






377 




3093 


020366 


104415 


000032 




DATACLK 


r 32 


3094 


020372 


104415 


OOOOOl 


72$l 


DATACLK 


, 1 


3095 


020376 


005200 






INC 


RO 


3096 


020400 


004537 


027212 




JSR 


RSfSIMBCC 


3097 


020404 


OOOOOl 






1 




3098 


020406 


OOOOOO 




73$l 







3099 


020410 


OOOOOO 




74$i 

















BCS 


7St 


. 3101 


020414 


064737 


027446 




JSR 


PCGETQI 


3102 


020420 


103006 






BCC 


76$ 


3103 


020422 


104013 






HLT 


13 


3104 


020424 


000404 






BR 


76$ 


3105 


020426 


004737 


027446 


75$l 


JSR 


PCGETQl 


3106 


U20432 


103401 






BCS 


76$ 


3107 


020434 


104017 






HLT 


17 


3106 


020436 






76$t 






3109 


020436 


006037 


020406 




ROR 


73$ 


3110 


020442 


013737 


027320 


020410 


MOV 


CALBCC#74$ 


3111 


020450 


022700 


000010 




CMP 


110, RO 


3112 


020454 


001346 






BNE 


72$ 


3113 


020456 


104401 






SCOPl 




3114 


020460 


104400 




77$I 


SCOPE 




3115 














1116 














3117 














3116 










J»TEST 


OF CRC OPERATION 
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I AND THE CHARACTER 377 
IGET TRANSMITTER ACTIVE 
f SHIFT BCC ONCE 
»B.UMP SHIFT COUNT 
jCALCULATE SOFTWARE BCC LSB 
fONE SHIFT 
JDATA CHARACTER 
}uLu BCC 

;BR IF SOFT BCC LSB IS SET 

yGET HARDWARE TRANSMITTER BCC LSB 

fBR IF HARD BCC LSB IS CLEAR 

} ERROR, BCC LSB IS SET 

I CONTINUE 

fGET HARDWARE TRANSMITTER BCC LSB 
fBB IF HARD BCC LSB IS SET 
I ERROR, HARD BCC LSB IS CLEAR 

I SHIFT SOFT DATA 

fLOAD OLD SOFT BCC 

fDONE YET7 

IBR IF NOT DONE 

} SCOPE SUBTEST CSW09«1) 

J NEW SCOPE 1 

I CLEAR BCC REGISTERS 

t START SHIFT COUNTER AT ZERO 

)LOAD POLYNOMIAL FOR SOFTWARE BCC 

I LOAD CHAR FOR SOFTWARE BCC 

rCLEAR OLD SOFTWARE BCC 

I LOAD OUT SILO WITH 2 SYNCS 

fAND THE CHARACTER 377 

I GET RECEIVER ACTIVE 

I SHIFT BCC ONCE 

rBUMP SHIFT COUNT 

I CALCULATE SOFTWARE BCC LSB 

fONE SHIFT 

fDATA CHARACTER 

fOLD BCC 

I BR IF SOFT BCC L88 IS SET 
J GET HARDWARE HGCEIVkk BCC LSB 
fBR IF HARD BCC LSB IS CLEAR 
} ERROR, BCC LSB IS SET 

} CONTINUE 

}GET HARDWARi: RECEIVER BCC LSB 
I BR IF HARD BCC LSB IS SET 
f ERROR, BCC LSB IS CLEAR 

I SHIFT SOFT DATA 

I LOAD OLD SOFT BCC 

jOONE YETT 

rBR IF NOT DONE 

fSCOPE SUBTEST (SW09>1) 

I SCOPE THIS TEST 



TEST 44 
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31 1** 












J*USING 


THE CRC16 POLYNOMIAL, SINGLE CLOCK THE CHARACTER 


31 20 












t»125, 


VERIFY THE LSB OF 


ThP: BCC ON EACH SHIFT 


1121 












;#TE5T 


TRANSMITTER FIRST 


TriFN THE RECEIVER BCC 


3122 












1 {-»««««**• «»«»«««*««« 


312 3 
3124 












1 TEST 


44 




1125 


















3126 


02046 2 


?I ,Z 




AA J A1 A 


TST44t 


MOV 


#44,TSTN0 




3127 


070470 


0127 37 


020776 






MOV 


»TST45irEXT 




3 1 28 


0204 76 


0127 37 


020512 


OOIZ^O 




MOV 


#64$, LOCK 




3129 
















rRl CONTAINS BASE DMCll ADDRESS 


3 1 30 


02 0504 


104412 








hSTCLR 




J MASTER CLEAR DMCll 


3131 


020506 




AA AA AA 






MOV 


fBXTll, (Rl) 


SET LU LOUP 


3132 


02051 2 


00473 


027662 




648 1 


JSR 


PCCLRIO 


fCLEAR BCC REGISTERS 


313 3 


02O5I 6 


005000 








CLR 


RO 


START SHIFT COUNTER AT ZERO 


313 4 






120001 


027 316 




MOV 


•CRC16,XP0LY 


LOAD POLYNOMIAL FOR SOFTWARE BCC 


3135 


O2O526 


012737 


000 1 25 


020566 




MOV 


1125, 66$» 


rLOAD CHAR FOR SOFTWARE BCC 


^ ! 


020534 




AIAK^ A 

OZODTv 






CLR 


67$ 


fCLEAR OLD SOFTWARE BCC 


31 37 




004737 


027322 






JSR 


PCiBCCLD 


LOAD OUT SILO WITH 2 SYNCS 




0205 44 










125 




AND THE CHARACTER 125 


3139 


020546 


104415 


A A A A^ 1 






DATACLK 


t 21 


GET TRANSMITTER ACTIVE 


3140 


0?05S2 




A A A A A 4 
00000 1 




65 91 


DATACLK 


, 1 


rSHIFT BCC ONCE 


3141 


020556 


n A c 1^ n A 
005 z DO 








INC 


RO 


fBUMP SHIFT COUNT 


3142 


02O56O 


004537 


027212 






JSR 


R5f SXMBCC 


CALCULATE SOFTWARE BCC LSB 


3143 


020564 


000001 








1 




ONE SHIFT 


3144 


020566 


000000 






6691 







DATA CHARACTER 


3 1 45 


020570 


000000 






678 1 







OLD BCC 




020572 


1 0340S 








BC8 


6S$ 


BR IF SOFT BCC LSB IS SET 


314 7 


020574 


0047 37 


027434 






JSR 


PCGETQO 


GET HARDWARE TRANSMITTER BCC LSB 


314ft 


020600 


1 03006 








BCC 


69$ 


BR IF HARD BCC LSB IS CLEAR 




020fi02 


104012 








HLT 


12 


ERROR, BCC LSB IS SET 


3150 


020604 


000404 








BP 


69$ 


CONTINUE 


3 ISi 






027 4 34 




68$ 1 


JSR 


t>C,GET0O 


rGET HARDWARE TRANSMITTER BCC LSB 


3152 


0206 1 2 


1 03401 








BCS 


69$ 


BR IF HARD BCC LSB IS SET 




0206 1 4 


104016 








HLT 


16 


ERROR, HARD BCC LSB IS CLEAR 


3154 


020616 








69$ t 










020616 


006037 


0205oo 






ROR 


66$ 


SHIFT SOFT DATA 


3156 


0206 22 


0137 37 


027320 


A*% AK ^ A 

0209 '0 




MOV 


CALBCC,67$ 


LOAD OLD SOFT BCC 


3157 


020630 


022700 


OOOOiO 






CMP 


llOrRO 


DONE YET? 


315R 


020634 


001346 








BNE 


65$ 


BR IF NOT DONE 


^! 


0206 36 


1 04401 








SCOPl 




SCOPE SUBTEST CSW09b1} 




020640 


0127 37 


020646 


A A 4 A A 

001 3*0 




MOV 


«71$f LOCK 


NEW SCOPEl 


3161 


020646 


004737 


027662 




71$J 


JSR 


PC#CLRXO 


CLEAR BCC REGISTERS 


3162 


02065 2 


y 1 J D u u u 








CLR 


RO 


START SHIFT COUNTER AT ZERO 


31b3 






120001 


027 316 




MOV 


«CRC16iXP0LY 


LOAD POLYNOMIAL FOR SOFTWARE BCC 


3164 




0127 37 


000 125 


A ^ A^ ^ 1 

0207 




MOV 


1125, 73$r 


LOAD CHAR FOR SOFTWARE BCC 




02067 




0207 24 






CLR 


74$ 


CLEAR OLD SOFTWARE BCC 


3166 




0047 37 


U27 i22 






JSR 


PCfBCCLD 


LOAD OUT SILO WITH 2 SYNCS 


3167 


020700 


0Q0125 








125 




AND THE CHARACTER 125 


3)68 


030702 


104415 


000032 






DATACLK 


f 32 


GET RECEIVER ACTIVE 


3169 


020706 


104415 


000001 




72$| 


DATACLK 


, 1 


SHIFT BCC ONCE 


3170 


020712 


005200 








INC 


RO 


BUMP SHIFT COUNT 


3171 


070714 


004537 


027212 






JSR 


RSfSlHBCC 


CALCULATE SOFTWARE BCC LSB 


3172 


020720 


000001 








1 




ONE SHIFT 


3173 


020722 


000000 






73$| 







DATA CHARACTER 


3174 


070724 


000000 






74$t 







OLD BCC 
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3175 


020726 


103405 






BCS 


75$ 


fBR IF SOFT BCC LSB IS SET 


3176 


020730 


004737 


027446 




JSR 


PCGETQX 


IGET HARDWARE RECEIVER BCC LSB 


3177 


020734 


103006 






BCC 


76$ 


|BR IF HARD BCC LSB IS CLEAR 


117a 


020736 


104013 






HLT 


13 


fERROP, BCC LSB IS SET 


3179 


020740 


000404 






BR 


76$ 


ICQNTINUE 


3180 


020742 


004737 


027446 


75$t 


JSR 


PCGETOI 


IGET HARDWARE RECEIVER BCC LSB 


31PI 


020746 


J03401 






BCS 


768 


;BR IF HARD BCC LSB IS SET 


3182 


020750 


104017 






HLT 


17 


TERROR, BCC LSB IS CLEAR 


3183 


020752 






76$t 








31R4 


020752 


006037 


020722 




ROR 


73$ 


;SHIFT SOFT DATA 


3185 


020756 


013737 


027320 020724 




MOV 


CALBCC,74$ 


rLOAD OLD SOFT BCC 


3186 


020764 


022700 


OOOOiO 




CMP 


•10, FO 


jDONE YETT 


3187 


070770 


001346 






BNE 


72$ 


|BP IF NOT DONE 


3198 


02O772 


104401 






SCOPl 




jSCOPE SUBTEST CSW09«1) 


3189 


020774 


104400 




77$l 


SCOPE 




, SCOPE THIS TEST 



3191 
3192 
3193 
3194 
3195 
3196 
3197 
3198 
3199 
3200 
3201 
3202 
3203 
3204 
3205 
3206 
3207 
3208 
3309 
3210 
321 1 
3212 
3213 
3214 
3215 
3216 
3217 
3218 
3219 
3220 
3321 
3222 
3223 
3224 
3225 
3226 
3227 
3229 
1279 
3730 



020776 
021004 
021012 

021020 
021022 
021026 
021032 
021034 
021042 
021050 
021054 
021060 
031062 
021066 
021072 
021074 
021 100 
021102 
021104 
021 106 
021110 
021114 
021116 
U71120 
021 122 
021126 
021130 
021132 
n 3 1 1 3 7 



012737 
012737 
012737 

104412 
012711 
004737 
005000 
012737 
012737 
005037 
004737 
000252 
104415 
104415 
005200 
004537 
000001 
000000 
000000 
103405 
004737 
103006 
104012 
000404 
004737 
103401 
104016 



000045 001226 
021312 001216 
021026 001220 



004000 
027662 

120001 027316 
000252 021102 
021104 
027322 

000021 
000001 



TST45I 



027434 



006037 021102 



69$t 



66$t 
&7$t 



68$t 
69$l 



t »*«*«««•»*«**««*«#«»#**«»#• TEST 45 ##«##«#•••*»•#»*#»»•»*»»*•* 

f»TEST or CRC OPERATION 

f#USING THE CRC16 POLYNOMIAL, SINGLE CLOCK THE CHARACTER 
|»252» VERIFY THE LSB OF THE BCC ON EACH SHIFT 
»*TEST TRANSMITTER FIRST THEN THE RECEIVER BCC 



1 TEST 


45 


MOV 


«4SrTSTNQ 


MOV 


«TST46,NEXT 


MOV 


»64$rL0CK 


MSTCLR 




MOV 


iBITU,CRn 


JSR 


PCCLRIO 


CLR 


RO 


MOV 


#CRCU,XPOLy 


MOV 


#252,668} 


CLR 


678 


JSR 


PCiBCCLD 


252 




DATACLK 


21 


DATACLK 


1 


INC 


RO 


JSR 


R5»8IMBCC 


1 











BCS 


688 


JSR 


PCGETQD 


BCC 


698 


HLT 


12 


BR 


69$ 


JSP 


PCGETOt! 


BCS 


698 


HLT 


16 


ROR 


668 



|R1 CONTAINS BASE DHCll ADDRESS 

r MASTER CLEAR DMCll 

fSET LU LOOP 

tCLEAR BCC REGISTERS 

} START SHIFT COUNTER AT ZERO 

;LOAD POLYNOMIAL FOR SOFTWARE BCC 

fLOAD CHAR rOR SOFTWARE BCC 

y CLEAR OLD SOFTWARE BCC 

I LOAD OUT SILO WITH 2 SYNCS 

|AND THE CHARACTER 252 

iGET TRANSMITTER ACTIVE 

I SHIFT BCC ONCE 

jBUMP SHIFT COUNT 

J CALCULATE SOFTWARE BCC LSB 

fONE SHIFT 

fDATA CHARACTER 

I OLD BCC 

}BR IF SOFT BCC LSB IS SET 

»GET HARDWARE TRANSMITTER BCC LSB 

|BR IF HARD BCC LSB IS CLEAR 

f ERROR, BCC LSB IS SET 

iCONTINUE 

iGET HARDWARE TRANSMITTER BCC LSB 
(BR IF HARD BCC LSB IS SET 
(ERROR, HARO BCC LSB IS CLEAR 

(SHIFT SOFT DATA 
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3231 


02 J 1 36 


013737 


027 320 


1732 


2 1 1 4 4 


022700 


00001 


3233 


Q2 1 1 50 


(J n 1 3 4 6 




32 34 


021152 


104401 




3235 


021 lS4 


012737 


021162 


3236 




004737 


027662 


3237 


021 166 


005000 




3238 


0?1 l70 


012737 


120001 


3239 


2 1 1 7 6 


012737 


000252 


3240 


02120 4 


005037 


021240 


3241 


1 X ! 


00473? 


027322 


3242 


021214 


00025 2 




3?4I 


03l2l 6 


J 0441 5 


000032 


3244 


031222 


104415 


000001 


3245 


021226 


005200 




3246 


021230 


Q04537 


027212 


3247 


021234 


OOOOOl 




3244 


021336 


000000 




3249 


021 240 


000000 




3250 


021242 


103405 




3251 


021244 


004737 


037446 


3252 


021250 


103006 




3253 


021252 


104013 




3254 


02 1 254 


000404 




3255 


02 1 256 


0047 37 


027446 


3256 


021262 


1 03401 




3257 


021264 


10401 7 




3258 








3259 


02 1 266 




021236 


3260 




013737 


027320 


326 1 


^ ' 




UU^fW i. 


3262 




001346 




3263 


021 306 


1 Q440 1 




3264 


21310 


1 04400 




3265 








3266 








3267 








3268 








3269 








3270 








327 1 








3272 








327 3 








3274 








3275 


021312 


0127 37 




3276 


021320 


012737 


02 1 5S0 


3277 








3278 


021326 


104412 




3279 


023 330 


012711 


004000 


3280 


021334 


005003 




3281 


021 336 


O05O04 




3282 


021340 


005005 




3283 


021342 


00503? 


021444 


3284 


021346 


012737 


120001 


3285 


021354 


004737 


037464 


3286 


021360 


010461 


000004 



027316 
021236 



73l» 
74St 



7611 



TST46I 





^ h t.Si.f*f - * T e 
VnilOLv. f O 7 5 


CMP 


1 I 0# RO 


BNE 








KQV 






PC»CtRIO 


CLP 


RO 




«^D^iA vnnrv 
ffCKC 1 6« APUUI 


MOV 


I252f73$; 


CLF 


74$ 


JSR 


PCf 5CCLD 


252 




D&T&CTiK 


* 32 




t 1 


I He 








1 











BC5 


751 


JSR 




BCC 


761 


HLT 


1 3 


BR 


761 


JSR 


PCfGCTQI 


BCS 


76» 


HLT 


17 


ROR 


73» 


MOV 


CAI.8CC*74» 


CMp 


«10«R0 


BNE 


731 


SCOPl 




SCOPE 





fLOAO OLD SOFT BCC 

IDQME YET? 

J BR IF NOT DONE 

;SCOPE SUBTEST CSWO^alJ 

J NEW SCOPEl 

jCLEAR BCC REGISTERS 

J START SHIFT COUNTER AT ZERO 

TLOAD polynomial FOR SOFTWARE SCC 

fLOAD CHAR FOR SOFTWARE BCC 

tCLEAR OLD SOFTWARE BCC 

;LOAD OUT SILO WITH 2 SYNCS 

rAND THE CHARACTER 252 

»GET RECEIVER ACTIVE 

I SHIFT BCC ONCE 

(BUMP SHIFT COUNT 

(CALCULATE SOFTWARE BCC W 

(ONE SHIFT 

(DATA CHARACTER 

»OL0 BCC 

JBR IF SOFT BCC I^SB IS SET 
((JET HARDWARE RECEIVER BCC L38 
(BR IF HARD BCC LSB IS CLEAR 
(ERROR, BCC LSB IS SET 
(CONTINUE 

(GET HARDWARE RECEIVER BCC LSB 
(BR IF HARD BCC fcSB IS SET 
(ERRORf BCC LSfi IS CLEAR 

(SHIFT SOFT DATA 

thOM OLD SOFT BCC 

(DONE YET? 

(BR IF NOT DOME 

(SCOPE SUBTEST CSWOf«l) 

(SCOPE THIS TEST 



(**«»*««»#*««««#«**«««*«««0 TEST 46 
(♦TRANSMITTER CRC TEST 

(♦USING THE CRC16 POLYNOMINAL, SINGLE CLOCK A BINARY 

(#COUNT PATTERN, VERIFY THE LSB OF THE TRANSMITTER BCC ON KACH SHIFT 
( TEST 46 



027316 



I— • 

MOV 
MOV 



M8TCLR 

MOV 
CLR 
CLR 
CLR 
CLR 
MOV 
JSR 
MOV 



f46fTSTN0 

|TST47,NE3{? 



SSITll*£Ri) 

R3 

R4 

RS 

41 

iCRCl6#XP0J,Y 

PC»SYNLD 

R4,4tRl5 



fRl CONTAINS BA8£ DMCll ADDRESS 
(MASTER CLEAR DMCU 

(SST hlHZ UNIT LOOP 
(ZERO BIT COUNT 

fR4 CONTAINS CHAR TO BE LOADED IN SILO 

(R5 CONTAINS CHAR CURRENTLY BEING SHIFTED OUT 

(CLEAR SOFT BCC 

(LOAD POLYNOHINAL 

(LOAD SILO MIITH 2 SYNCS* SON SET 

t&ORT^^HAR 



DZDME MRCYll 30(1046) U-JUL-77 



DZDME, P; 


11 12 
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14(18 


3287 


021364 


104414 




3288 


021366 


122110 




3289 


021370 


005204 




3290 


021372 


010461 


000004 


3291 


021376 


104414 




3292 


021400 


122110 




3293 


021402 


005204 




5294 


021404 


010461 


000004 


3?95 


021410 


104414 




3296 


021412 


122110 




3297 


021414 


004737 


036350 


3298 


021420 


104415 


000021 


3299 


021424 


010537 


021443 


3300 


021430 


104415 


OOOOOl 


3301 


021434 


004537 


027213 


3302 


021440 


000001 




3303 


021442 


000000 




3304 


021444 


000000 




3305 


021446 


103405 




3306 


021450 


004737 


037434 


3307 


021454 


103006 




3308 


021456 


104020 




1309 


O21460 


000404 




3310 


021462 


004737 


027434 


3311 


021466 


103401 




3312 


021470 


104021 




3313 








3314 


021472 






3315 


021472 


006037 


031443 


3316 


021476 


013737 


037320 


3317 


021504 


005203 




3318 


021506 


022703 


OOOOlO 


3319 


021512 


001346 




3320 


021514 


005003 




3321 


021516 


005304 




3322 


021520 


022704 


000400 


3323 


021524 


003404 




3324 


021526 


010461 


000004 


3325 


02153Z 


104414 




.. 3326 


021534 


133110 




3327 


021536 


005205 




3329 


021540 


022705 


050400 


3329 


021544 


001327 




3330 


021546 


104400 




3331 








3332 








3333 








3334 








3335 








3336 








3337 








3338 








3339 








3340 








3341 


021550 


012737 


000047 


3342 


021556 


012737 


022006 
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ROHCLK 
132110 
INC 
MOV 

ROMCLK 
132110 

INC 
MOV 

ROHCLK 
133110 
JSR 

DATACLK 
MOV 

DATACLK 
JSR 



PAGEl 0082 



Itl 
38t 



311 
411 



9lt 
7lt 



R4 

R4f 4CBn 



R4 

o4.4rpi ) 



PCrOCOR 
21 

R9f3l 

BSrSIMBCC 



1 



BCS 

JSR 

BCC 

HLT 

BR 

JSR 

BCS 

HLT 



ROR 
MOV 
INC 
CMp 
BNE 
CLR 
INC 
CMP 
BLE 
MQY 



9« 

PCfGCTOlO 

61 

20 

6t 

PCf GSTga 

61 

31 



3t 

CALBCC,4t 
R3 

tlOfR3 
21 

R3 
R4 

f400fR4 
9t 

R4i4£Rn 



122110 

IKC P5 

CMp f4en.RS 

BNE 11 

SCOPE 



(NEXT «0R0 IS INSTRUCTION, RPHCLK PC«5304 
(LOAD OUT DATA 

(INCREMENT TO NEXT CHARACTER 
I^RT4*CHAR 

(NEXT WORD IS INSTRUCTION, ROMCLK PC«3304 
(LOAD OUT DATA 

(INCREMENT TO N€XT CHARACTER 
I RQR'P4^HAR 

(NEXT Word is instruction, RQMCLK PC»6304 
(LOAD OUT DATA 
(MAIT FOR OCOR 
I CLOCK DATA 

(LOAD CHAR FOR SOFT CRC 
(SiilFT BCC ONCE 
(CALCULATE SOFT BCC 
(SOFT SHIFT COUNT 
(SOFT CHARACTER 
(OLD SOFT BCC 

(BR IF aOFT BCC LSB IS SET 

(GET HARDWARE TRANSMITTER BCC LSB 
I BR IF OK eCLEAREi}) 
(ERR0R, aCC LSB HAS SET 
(.COBTINUC WITH TEST 

(GET HARARE TRANSMITTER SCC LS5 
(BR IF OK (SET) 
(ERROR, BCC LSB HAS CLEAR 



(SHIFT SOFT DATA 
(LOAD OLD SOFT BCC 
(INCREMENT BIT COUNTER 
(DONE A FULL CHARACTER YET7 
(BJ) IF NO 

(RESTART BIT COUNTER 
(INCREMENT DATA FOR SILO 
(DONE BINARY COUNT YETT 
(BR IF YES 
( P0RT4«DATA 

- ss"V!r y^ar, TS T!SS?2lIf??!£2H. SGMCLK PCE53S4 

(LOAD OUt'oaTA 

(INCREMENT DATA 

(DONE BINARY PATTERN YET7 

(BR IF NO 

(SCOPE THIS TEST 



(««#»«A#««»«49ft«###«4«#«*t** TEST 47 ##♦♦♦*##•»#»•#####**#••*#•# 

(♦RECEIVER CRC TEST 

(♦USING THE CRCU POLYNOMIHAL, SINGLE CLOCK A BINARY 

(♦COUNT PATTERN, VERIFY THE LSB OF THE RECEIVER BCC ON EACH SHIFT 

((•♦♦♦«*«««**««««««*tt««««^«»***»^«*«^*««**^^*^^^«^#^^^^^^^^^^^^^ 



TST4?: 



( TEST 4? 

MOV 
MOV 



i47,TSTNO 
«TST50fNEXT 
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33 4 3 








3^44 


05 1S64 


1 4 4 1 2 






021^66 


012711 


004000 


3'? 4b 


02 1 •) 72 


05O{»3 




347 


21574 


005004 




3 3 46 


02 1576 


U05U05 




13 49 


fi ? 1 600 


005037 


021702 


3 350 




012737 


120001 


3351 


02 1 6 ' 2 


0047 37 


027464 


3352 


021616 


010461 


000004 


3 35 3 




1 044 1 4 




3354 


021624 


122110 




3355 


021626 


005204 




3356 


0216 30 


010461 


000004 


3 357 


021634 


104414 




3 35B 


021636 


122110 




3359 


021640 


005204 




3360 


021642 


01 46 1 


000004 


3361 


02 1 646 


1 04414 




3362 


O21650 


1221 10 




3363 


02 Its 2 


004737 


026350 


3364 


021656 


1 044 IS 


000032 


3365 


021662 


01 0537 


021700 


3366 


021666 


104415 


000001 


3367 


021672 


004537 


027212 


3 366 


02 1 67b 


000001 




3 369 


02 1700 


000000 




3 370 


021 702 


OOOOOO 




3 371 


021704 


1 03405 




3372 


02 1 706 


004737 


027446 


3373 


021 7 1 2 


103006 




3374 


021714 


1 04022 




3375 


021716 


000404 




3376 


0217 20 


004737 


027.446 


3377 


021 724 


103401 




3378 


0217 26 


104023 




3379 








3 380 


021 730 






3381 


021730 


006037 


021700 


3382 


021734 


013737 


027320 


336 3 




005 203 




33B4 


021744 


022703 


Ann A 1 n 


3305 


021750 


001 346 




3386 


021752 


005003 




3387 


021754 


05204 




3 3B8 


021 756 


022704 


u u u ^ V if 


3399 


021762 


00 3404 




3 390 


0717 64 


1046 1 


U U V w U ^ 


3391 


21770 


104414 




3392 


021772 


122110 




3393 


021774 


005205 




3394 


021776 


022705 


000400 


3395 


022002 


001327 




1396 


022004 


104400 




3397 








339P 









027316 



2«t 



3lt 

4$t 



6«| 



021702 



9(1 
781 











MSTCLR 








MOV 


•BITll, (HI) 


iStfT i.TNt' (iMTT rnno 


CLp 


R3 




fZtiPU BIT C^lUKT 


CLR 


R4 




r r H vuNJAinc t,rlAr* iw ot LiUAUCfiJ iN 


CLF 


P5 




I R5 CUMT&TMQ rWaB flTRBFMTI.V HliTHir 


CLp 


4S 




f v,uc<nn our 1 O'^Kt 


MOV 


#CRC16rXP0LY 


) LOAD POLYNOMINAL 


J5R 


PC 1 




tLOAD STLn WITH '3 ^VNTS. RfitA ^FT 


MOV 


H4 1 


I 4 ( Kl } 


( P0RT4_CHAR 


ROMCLK 








122110 






f USJHW UU X i/M X K 


INC 


P4 




1 INTRtJ'MP'NT Tfl MFXT rHAB&rTITB 
1 ITS. Puribn 1 lU nSiAi ^nHnA(<ibl^ 


MOV 


R4, 


' 4(P1 } 




ROmCLK 








122110 






ILUAD OUT ntTi 


INC 


R4 






MOV 


R4f 


I 4(P1 } 


fPQnT4 fH&P 


ROMCLK 






|NEXT WORD 15 I S4STRUCTI0N f RQHCLK ' 


122110 






iLOAD OUT DATA 


JSp 


PC, 


OCOB 


I WAIT FOR OCOR 


DATACLKi 


32 




fCLOCK DATA 


MOV 


R5, 


3« 


iLOAD fH&B irnD SQS"T CtlC 
, liWMW k^nnn r Ur^ OUT i vnv 


DATACLKi 






JSHIFT BCC ONCE 




B5, 


SIMBCC 


1 CALCULATE SOFT BCC 








1 SOFT SHIFT rniiMT 
four i onxr X ^uUnX 


















iDLn SOFT ftfP 


BCS 


5t 




J BR IF SOFT BCC LSB 15 SET 


JSR 


PC, 


CETQI 


I GET HARDWARE RECEIVER BCC 


BCC 


68 




IBR IF OK (CLEARED) 


HLT 


22 




(ERROR, BCC LSB WAS SET 


BR 


68 




ICCNTINUE HITH TEST 


JSR 


PC, 


GETOI 


IGET HARDWARE RECEIVER BCC 


BCS 


68 




|BR IF OK CSET) 


HLT 


23 




7 ERROR, BCC LSB WAS CLEAR 



ROR 
MOV 
INC 
CMP 
BNE 
CLR 
INC 
CMP 

BLE 
MOV 

ROMCLK 

122U0 

INC 

CHp 

BNE 

SCOPE 



3« 

CALBCC,4t 
B3 

f 10,R3 
2S 
R3 
R4 

»400,R4 
98 

R4,.4(R1} 



R5 

«400,R5 
18 



I SHIFT SOFT DATA 

(LOAD OLD SOFT BCC 

? INCREMENT BIT COUNTER 

I DONE A FULL CHARACTER YET? 

I BR IF NO 

JRESTART BIT COUNTER 
(INCREMENT DATA FOR SILO 
JDONE BINARY COUNT YET? 

»BR IF YES 
IP0RT4.DATA 

(NEXT MORD IS INSTRUCTION, ROHCLK PC«5304 

JLOAD OUT DATA 

(INCREMENT DATA 

(DONE BINARY PATTERN YET? 

(BR IF NO 

I SCOPE THIS TEST 
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-MAY-77 


14118 


3399 








3400 








3401 








3402 








3403 








3404 








3405 








3406 








3407 








. 3408 








3409 


022006 


012737 


000050 


3410 


022014 


0127 37 


022340 


341 1 








3412 


022022 


104412 




3413 
















3415 








3416 


022024 


012711 


004000 


3417 


022030 


012704 


030102 


3418 


022034 


005037 


022130 


3419 


022040 


012700 


000004 


3420 


022044 


004737 


027464 


3421 


022050 


004737 


026502 


3422 


022054 


004537 


027620 


3423 


022060 


030102 




3424 


022062 


000004 




3425 


022064 


004737 


027574 


3426 


022070 


004737 


026350 


3427 


022074 


005003 




3428 


022076 


104415 


000022 


3429 


022102 


112405 




3430 


022104 


010502 




3431 








3432 








3433 








3434 








3435 


022106 


012737 


120001 


3436 


022114 


010537 


022126 


3437 


022120 


004537 


027212 


3438 


022124 


OOOOlO 




3439 


022126 


OOOOOO 




3440 


022130 


OOOOOO 




3441 


022132 


013737 


027320 


3442 


022140 


104415 


000001 


3443 


022144 


106002 




3444 


022146 


103005 




3445 


022150 


004737 


026316 


3446 


022154 


103406 




3447 


022156 


104006 




344S 


022160 


000404 




3449 


022162 


004737 


026316 


3450 


022166 


103001 




345 1 


U22170 


104006 




3452 


022172 






3453 


022172 


005203 




3454 


022174 


022703 


000010 
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1281 



027316 



6781 
108t 



6S8I 



I «*•**•«*•««#•*«•#•**«««•«*• TEST 50 «*«*«*«««*««»•»*•»«»»«***»» 

(♦TRANSMITTER DDCMP CPC TEST 

(♦THIS TEST TRANSMITS A FOUR CHARACTER MESSAGE MITH CPC 
(*BOTH DATA AND THE BCC ARE VERIFIED IN THE BIT 
(*HIND0W, THE FOUR CHARACTERS ARE 0,125,252,377 

(•THE TRANSMITTER IS CHECKED FOR GOING TO A MARK STATE AFTER THE BCC 
(l««*tt»»«*****tt«*»fttttt«««*#«»*»t«tt«*«*#«*tt*tt**#*»««««***tt«tt«»**«« 

( TEST 50 

( -------------- 

MOV #50,TSTNO 
MOV ITST51,NEXT 



MSTCLB 

(LOAD OUT DATA SILO 



MOy 
HOV 
CLR 
MOV 
JSR 
JSR 
JSR 

MESDAT 
4 

JSR 
JSR 
CLR 

DATACLK,22 
MOVB 
MOV 



IBITll,(Bi) 
tMESDAT,R4 
108 
14, RO 
PCSYNLD 
PCOUTRDY 
RSfMESLD 



PCfEOM 
PC, OCOR 
R3 
22 

CR4)+,B5 
R5,R2 



(PI CONTAINS BASE DMCtl ADDRESS 
(MASTER CLEAR DMCil 



(SET LINE UNIT LOOP 
(LOAD POINTER TO DATA 
(CLEAR SOFT BCC 
(LOAD CHARACTER COUNT 
(LOAD 2 SYNCS IN OUT SILO 
(WAIT FOR OUTRDY 
(LOAD SILO WITH 4 CHAR MESS 
(ADDRESS OF MESSAGE 
(NUMBER OF CHARACTERS 

(LOAD GARBAGE CHARACTER, WITH EQM SET 

(WAIT FOR OCOR 

(CLEAR BIT COUNTER 

(CLOCK DATA 

(LOAD R5 WITH CHAR 

(LOAD R2 WITH CHAR 



(CHECK FIRST FOUR CHARACTER MESSAGE 
(IN THE BIT WINDOW C , 125 , 292, 377 ) 

MOV (»CRC16,XP0LY (LOAD POLYNOMIAL 

MOV R5,67S (LOAD SOFT CHAR FOR BCC 

JSP R5, SIMBCC (CALCULATE SOFT BCC 

10 (SHIFT COUNT 

(CHARACTER 

(OLD BCC 

HOY CALBCC,t08 (LOAD SOFT BCC FOR NEXT SHIFT 

DATACLX, 1 (SHIFT DATA IN TO BIT WINDOW 

RORB P3 (SHIFT SOFT DATA 

BCC 658 (BR IF A SPACE 

JSR PCCETSI (LOOK AT BIT WINDOW 

BCS 66$ (BR IF OK (MARK) 

HLT 6 (ERROR, BIT WINDOW WAS A SPACE 

BR 668 (CONTINUE 

JSR PCGETSI (LOOK AT BIT WINDOW 

BCC 668 (BR IF OK (SPACE) 

HLT 6 (ERROR, BIT WINDOW WAS A MARK 

INC R3 (BUMP BIT COUNTER 

CMP 110, R3 (DONE FULL B BITS YET 
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1455 
■5456 
^457 
345S 
1459 
3460 
3461 
3462 
3463 
3464 
3465 
3466 
3467 
346S 
3469 
3410 
3471 
3472 
3473 
3474 
347S 
3476 
3477 
3478 
3479 
3480 
3481 
3482 
3483 
3494 
3495 
3486 
3487 
3488 
3 489 
3490 
3491 
3492 
3493 
3494 
?495 
3496 
3497 
3498 
3499 
3500 

3501 
3502 
3503 

3504 
3505 
3506 
3507 
3Soa 
3509 
3510 



022200 
022202 
022204 
02 2206 



022210 
022214 
022220 
022222 
022224 
022230 
022232 
022234 
022236 
022242 
022244 
022246 
022246 
O22250 
022254 
022256 



023260 
022264 
022270 
02 SS*^' 
022274 
022276 
022302 
022304 
022310 
022312 
022316 
022322 
027324 
022326 
022330 
022334 
022336 



OU1357 






BNE 


64S 


I»R IF NO 


005003 






CLP 


R3 


rCLEAR BIT COUNTER 


005300 






DEC 


RO 


J DEC CHARACTER COU.NT 


OOi »35 






BNE 


12$ 


|HP IP KQI DONE YET 








KHECK 


BCC FUR PReCEOING *<ESSAfi£ IN THE BIT WISDOi* 


01370C! 


027320 




MOV 


CALBCC.RO 


IPUT aCC IN BO 


104415 


000001 


68$t 


DATACLK 


,i 


iSHirt HARDWARE BCC 


006000 






FOR 


RO 


;SHIFT SOFT BCC 


103005 






BGC 


691 


}BR IF CARRY CLEAR 


004737 


C25316 




JSg 


PCrCCTSI 


jLOOK AT BIT KtlNDOW 


103406 






5CS 


70S 


iSR IF OK £MAPK; 


104014 






HLT 


14 


lERRORf CRC WRQNG (SPACE) 


U V 'r V 






BP 


7Q* 


jCQMINU^ 


004737 


026316 


69t| 


J3R 


PCiGETSI 


thOm AT 'BIT WINDOW 








BCC 


704 


|BR IF OK (SPACE) 


104014 






HIjT 


U 


fERRQR, CRC WRONG CKARK) 






70$.t 








005203 






INC 


B3 


jBUMP BIT COUNTER 


022703 


000020 




CMP 


#20, R3 


1 FIN I SHED BCC lETT 


001357 






BNE 


68$ 


»8R IF NO 


005003 






CLR 


R3 


(CLEAR BIT COIIJITER 








1 CHECK 


TO SEE IF TRANSMITTER IS MARKIHG 


104415 


OOOQOl 


2«t 


DATACIiK 


f i 


ICLQCK TRANSMITTER 


004737 


026316 




JSR 


PCtGETSI 


jLOQK AT WINDOW 


103401 






BCS 


38 


|IT SHOULD BE MARKING 


104024 






HLT 


24 


iCRRORf BIT WAS A SPACE 


005203 




3ii 


IKC 


R3 


iBUMP BIT COUNTER 


022703 


000007 




CWp 


«7#R3 


rDONE YET 


001366 






BNE 


2$ 


I BR IF HO 


104415 


OQOOlO 




DATACLK 


1 10 


I GIVE ENOUGH TICKS TO CLEA 


005003 






CLR 


R3 


JCLEAR BIT COUNTER 


104415 


aooool 


4*1 


DATACLK 


1 1 


1 SHIFT OUT NEXT BIT 


004737 


026316 




JSR 


PCf GET8I 


thOm AT BIT WINDOW 


103401 






BCS 


t + 4 


IBR IF IT IS A MARK 


104024 






HLT 


24 


jERRQRf TRANSMITTER IS NOT 


005203 






INC 


R3 


|IKC BIT COUNT 


022703 


000020 




CMP 


i20fR3 


»DONE YET? 


001366 






BME 


4S 


iBR IF NO 


1 04400 




5tt 


SCOPE 




1 SCOPE THIS TEST 



022340 012737 000051 001226 
032346 012737 022542 001216 



fSfSU 



)#««««»•»•»•««*»»**««**»«##« TEST Si **«•*«>#**##««««•*•**«««*«** 

j*RECEIVER DDCMP CRC TEST 

}*THIS TEST CLOCKS A FOUR CHARACTER MESSAGE WITH BCC 
f»AND VERIFYS CORRECT DATA RECEPTION AND BCC MATCH 

f«THC FOUR CHARACTiR MESSAGE IS Or 1£S,2S2# 377 

I t •««««****»*»****«*«««#•**«»****#•****##»»*««*««*»*«•#*»«****«• 

r TEST 51 
i 

MOV 
MOV 



»51(TST»0 
#TST52,fE3tT 
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•MAY-77 


una 


3511 








3512 


022354 


104413 




3513 


022356 


012711 


004000 


3514 


022362 


012702 


030102 


3515 


022366 


012700 


000004 


3516 


022372 


004737 


027464 


3517 


022376 


004737 


026502 


55 i S 


C22402 


00453? 


027620 


. 3519 


022406 


030102 




3520 


022410 


000004 




3521 


022412 


004737 


027574 


3522 


022416 


004737 


026350 


3523 


022422 


104415 


000114 


3524 


022426 


004737 


027156 


3525 


022432 


104414 




3526 


022434 


021204 




3527 


022436 


016104 


000004 


3528 


022442 


112205 




3529 


022444 


120504 




3530 


022446 


001401 




3531 


022450 


104010 




3532 


022452 


005300 




3533 


022454 


001364 




3534 








3535 








3536 








3537 


022456 


004737 


027156 


3538 


022462 


104414 




3539 


022464 


021204 




3540 


022466 


116137 


000004 


3541 


022474 


042737 


177400 


3542 


022502 


004737 


027156 


3543 


022506 


104414 




3544 


022510 


021244 




3545 


022512 


016104 


000004 


3546 


022516 


042704 


000376 


3547 


022522 


012705 


000001 


3548 


022526 


U0S04 




3549 


()22aJ0 






3550 


022532 


104015 




3551 


022534 






3552 


022534 


104414 




3553 


022536 


021204 




3554 


022540 


104400 




3555 








3556 








3557 








3558 








3559 








3560 








3561 








3562 








3563 








3564 








3565 








3566 
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tHl CONTAINS BASE DMCll ADDRESS 



25tl 
211 



MSTCLR 




1 MASTER CLEAR DMCll 




MOV 


IBITllf CRU 


ISET LINE UNIT LOOP 




MOV 


tMESDATfR2 


(LOAD POINTER TO DATA 




MOV 


l4rR0 


ILOAD CHARACTER COUNT 




JSR 


PCSYNLD 


fLOAD 2 SYNCS IN OUT SILO 




JSR 


PC*OUTRDY 


J WAIT FOP OUTRBY 




JSR 


RSfHESLO 


tLOAD SILO WITH 4 CHAR HESS 


MESDAT 




f ADDRESS or MESSAGE 




4 




INVJ4BER OF CHARACTERS 




JSR 


PCf EDM 


ILOAD GARBAGE CHARACTER, WITH EOM 


JSR 


PCrOCOR 


IWAIT FOR OCOR 




DATACLK 




(CLOCK tULTA 




JSR 


PCflHRDY 


(NAIS FOR INRDY 




ROMCLK 




(NEXT WORD IS INSTRUCTION, 


ROMCLK 


021304 




IGET IN DATA 




MOV 


4(Rl)rR4 


IPUT "FOUUD" IN R4 




HDVB 


CR25^,R5 


iPUt * EXPECTED* IN R5 




CHPB 


R5fR4 


1 COMPAQ RECEIVED DAtA 




BEQ 


11 


1 BR IF OK 




HLT 


to 


}DATA ^RROR 




DEC 


RO 


(DEC CHARACTER COUNT 




BNE 




(BR IF NQf DONE YET 




) CHECK 


TO SEE THAT IN 


BCC HATCH IS SET 




JSR 


PCflNRDY 


(WAIT FOR INRDY 




RONCLK 




(NEXf WORD IS INSTRUCTION, 


ROHCLK 


021204 




(GET FIRST HALF OF CRC 




MOVE 


4(Rn,TGHP3 


(P^T IN TEMPS 




8IC 


tl77400f TEMP) 


(CLEAR HI BYTE 




JSR 


PCflNRDY 


(WAIT FOR INRDY 




ROMCLK 




(NEXT WORD IS INSTRUCTION, 


ROMCLK 


021244 








MOV 


4(R1),R4 


(PUT "FOUND" IN R4 




BIC 


t376iR4 


(CLEAR UjiWANTED BITS 




MOV 


llfRS 


(PUT "EXPECTED" IN ftS 




CMPB 


R5»R4 


(IS IN BCC MAI^H S^TT 




BES 


351 






HLT 


15 


(IN BCC liAfeH ERROR 




ROHCLK 




(NEXT 1*08D IS INSTRUCTION, 


ROHCLK 


021204 




(GET LAST HALF 




SCOPE 




(SCOPE THIS TEST 





(»«***«•«#»*##»*««««**«••«*# T^ST 52 «*****«**«*•«****•*»•»»*»** 
(•DDCHP EOM FUNCTION TEST 

(»THI8 TEST LOADS OUT SILO WJTH} 2 SYNCS, 4 CHAR MESSAGE, EON 

1*4 CHARACTER MESSfE^M, THE DATA STREAM IS CHECKED TO'BE 

(•4 CHAR, BCC, 4 CHAR, BCC, MARKS, THIS TEST VERIFYS THAT 

(•THE CHARCTERS LOADED WITH EOH SET ARE LOST 

(•ALL DATA AND BCC'S ARE CHECKED IN THE BIT WINDQN 

(•THE FOUR CHARACTSB MS&SAQE IS 0,125,252,377 

(•RECEIVED DATA IS VERIFIED, AND IN BCC MATCH IS CHECKED 

( (•••••••t*«»*^«-«^«t*«««*»t«^«««#««*«ff ••••••••••*••••*••••*•••• 
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3567 






























; TEST 


52 






















3*170 


022542 


012737 


000052 


001226 


TST52J 


MOV 


|52#TSTNO 




3S7 1 


022550 


0127 37 


023642 


001216 




MOV 


»XST53,NEXT 




3572 
















rRl CONTAINS BASE DHCll ADDRESS 


3573 


022556 


104412 








MSTCLP 




(MASTER CLEAR DMCll 


3574 
3'575 












ILOAD OUT DATA SILO 




3576 


















3577 


022560 


01 271 1 


004000 






MOV 


iBZTllrCRn 


)5ET LINE UNIT LOOP 


3578 


022564 


012704 


030102 






MOV 


fMESDAT,R4 


fLOAD POINTER TO DATA 


3579 


022570 


005037 


022700 






CLB 


10* 


fCLEAR SOFT BCC 


3580 


022574 


012700 


000004 






MOV 


I4#R0 


jLOAO CHARACTER COUNT 


35ei 


022600 


004737 


027464 






JSP 


PC#SYNLD 


}LOAD 2 SYNCS IN OUT SILO 


3582 


022604 


0U4737 


026502 






JSR 


PCfOUTRDY 


IWAIT FOR QUTRDY 


3583 


022610 


004537 


027620 






JSR 


R5f MESLD 


jLOAD SILO WITH 4 CHAR MESS 


3584 


022614 


030! 02 








MESDAT 




I ADDRESS OF MESSAGE 


358S 


022616 


000004 








4 




} NUMBER OF CHARACTERS 


3586 


022620 


004737 


027574 






JSR 


PCEOM 


;LOAD GARBAGE CHARACTER, WITH EOM 


3587 


022624 


004537 


027620 






JSR 


RSrMESLD 


}LOAO FOUR MORE CHARACTERS 


3588 


022630 


030102 








NESDAT 




{ADDRESS OF MESSAGE 


3589 


022632 


000004 








4 




f NUMBER OF CHACTERS 


3590 


022634 


004737 


027574 






JSR 


PC # EDM 


|SET EOM 


3591 


022640 


004737 


0263S0 






JSR 


PC#OC0R 


yWAIT FOR OCOR 


3592 


022644 


005003 








CLR 


R3 


iCLEAR BIT COUNTER 


3593 


022646 


104415 


000022 






DATACLK 


#22 


jCLOCK DATA 


3594 


022652 


112405 






12*1 


MOVB 


(R4)+fR5 


rLOAD RS WITH CHAR 


3595 


022654 


01 0502 








NOV 


R5f R2 


jLOAD R2 MITH CHAR 


3596 


















3597 












ICHECK 


FIRST FOUR CHARACTER MESSAGE 


3598 












fZN THE 


BIT WINDOW CO, 


125,252#377) 


3599 


















3600 


022656 


012737 


120001 


027316 




MOV 


fCRC16,XP0LY 


ILOAD POLYNOMIAL 


3601 


022664 


010S37 


022676 






MOV 


R5f67$ 


;LOAD SOFT CHAR FOR BCC 


3602 


022670 


004537 


027212 






JSR 


RSfSIMBCC 


» CALCULATE SOFT BCC 


3603 


022674 


000010 








10 




rSHIFT COUNT 


3604 


022676 


000000 






67»l 







^CHARACTER 


36U5 


022700 


000000 






lOSi 







|OLD BCC 


3606 


022702 


013737 


027320 


022700 




MOV 


CALBCCf 10* 


jLOAD SOFT BCC FOR NEXT SHIFT 


3607 


022710 


10441S 


000001 




64$t 


DATACLK 


r 1 


JSHIFT DATA IN TO BIT WINDOW 


3608 


022714 


106002 








HORB 


R3 


1 SHIFT SOFT DATA 


3609 


022716 


103005 








BCC 


65* 


}BR IF A SPACE 


3610 


022720 


004737 


026316 






JSR 


PC # GETS I 


ILOOK AT BIT WINDOW 


36 11 


022724 


103406 








BCS 


66* 


;BR IF OK (MARK) 


3612 


022726 


104006 








HLT 


6 


}ERROR, BIT WINDOW WAS A SPACE 



3613 


022730 


000404 






BR 


66* 


ICONTINUE 


3614 


022732 


004737 


026316 


65*t 


JSR 


PCf GETSI 


;LOOK AT BIT WINDOW 


3615 


022736 


103001 






BCC 


66* 


fBR IF OK (SPACE) 


3616 


022740 


104006 






HLT 


6 


lERROR, BIT WINDOW WAS 


3617 


022742 






66*1 








3618 


022742 


005203 






INC 


R3 


»BUMP BIT COUNTER 


3619 


022744 


022703 


000010 




CMP 


#10, R3 


jDONE FULL 6 BITS YET 


3620 


022750 


001357 






BNE 


64* 


jBR IF NO 


3621 


022752 


005003 






CLR 


R3 


jCLCAR BIT COUNTER 


3622 


022754 


005300 






DEC 


RO 


»DEC CHARACTER COUNT 
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3623 


022756 


001335 






BNE 


12* 


|BR IF NOT DOME YET 


3624 
3625 










fCHECK 


BCC FOR PRECEDING MESSAGE IN THE BIT WINDOW 


3626 
3627 


022760 


013700 


027320 




HOV 


CALBCCRO 


(PUT BCC IN RO 


3628 


022764 


104415 


OOOOOl 


68«t 


DATACLK 


#1 


1 SHIFT HARDWARE BCC 


3629 


022770 


006000 






ROR 


RO 


1 SHIFT SOFT BCC 


3630 


022772 


103005 






BCC 


69* 


fBR IF CARRY CLEAR 


3611 


022774 


004737 


026316 




JSR 


PCfGETSI 


ILOQK AT BIT WINDOW 


.3632 


023000 


103406 






BCS 


70* 


jBR IF OK (MARK) 


3633 


O23O02 


104014 






HLT 


14 


fERROR, CRC WRONG (SPACE) 


3634 


023004 


000404 






BR 


70* 


ICONTINUE 


3635 


023006 


004737 


026316 


69*1 


JSR 


PCGETSI 


fLOOK AT BIT WINDOW 


1636 


023012 


103001 






BCC 


70* 


fBR IF OK (SPACE) 


3637 


023014 


104014 






HLT 


14 


fERROR, CRC WRONG (MARK) 


3638 


073016 






70*1 








3639 


023016 


OOS203 






TNc 


B| 


jeU"? BIT COUNTER 


3640 


023020 


022703 


000030 




CMP 


»30,R3 


fFINISHED BCC YET? 


3641 


023024 


OQ1357 






BNE 


6B« 


fBR IF NO 


3642 


023026 


005003 






CLR 


R3 


fCLEAR BIT COUNTER 


3643 


023030 


012700 


000004 




HOV 


l4rR0 


fRESET CHARACTER COUNTER 


3644 


023034 


012704 


030102 




MOV 


«MESDAT,R4 


fLOAD MESSAGE POINTER 


3645 


0230*0 


005037 


023072 




CLR 


11* 


fCLR SOFT BCC 


3646 


023044 


112405 




13*1 


MOVB 


(R4)+,R5 


fLOAD CHAR IN R5 


3647 


023046 


010502 






MOV 


RSfRS 


iLOAD CHAR IN R2 


3648 
















3649 










fCHECK 


SECOND MESSAGE 


IN THE BIT WINDOW (0,125,252,377) 


3650 
















3651 


023050 


012737 


120001 


027316 


MOV 


•CRCi6»XP0LY 


fLOAD POLYNOMIAL 


3652 


023056 


010537 


023070 




MOV 


R5»76$ 


fLOAO SOFT CHAR FOR BCC 


3653 


023062 


004537 


027212 




JSR 


RSfSIMBCC 


fCALCULATE SOFT BCC 


3654 


023066 


000010 






10 




fSHIFT COUNT 


3655 


023070 


000000 




76*t 







fCHARACTER 


3656 


023072 


000000 




IISI 







fOLD BCC 


3657 


023074 


013737 


027320 


023073 


MOV 


CALBCCll* 


fLOAD SOFT BCC FOR NEXT SHIFT 


3658 


023102 


104415 


OOOOOl 


73$t 


DATACL? 


:» 1 


jSKIfT DATA IN TO BIT WINDOW 


3659 


023106 


106002 






R0R8 


R3 


f SHIFT SOFT DATA 


3660 


023110 


103005 






BCC 


74* 


fBR IF A SPACE 


3661 


023112 


004737 


026316 




JSR 


PCfGETSI 


fLOOK AT BIT WINDOW 


3662 


023116 


103406 






BCS 


758 


fBR IF OK (MARK) 


3663 


023120 


104006 






HLT 


6 


fERROR, BIT WINDOW WAS A SPACE 


3664 


023122 


000404 






BR 


75* 


^CONTINUE 


3665 


023124 


004737 


026316 


74*1 


JSR 


PCrGETSI 


fLOOK AT BIT WINDOW 


3666 


0231 30 


103001 






BCC 


75* 


fBR IF OK (SPACE) 


3667 


023132 


104006 






HLT 


6 


(ERROR, BIT WINDOW WAS A MARK 


3668 


023134 






75*1 








3669 


023134 


005203 






INC 


R3 


fBUMP BIT COUNTER 


3670 


023136 


022703 


000010 




CMP 


«10,R3 


fDONE FULL B BITS YET 


3671 


023142 


001357 






BNE 


73* 


fBR IF NO 


3672 


023144 


005003 






CLR 


R3 


fCLEAR BIT COUNTER 


3673 


0231 46 


005300 






DEC 


RO 


|DEC CHARACTER COUNT 


3674 


023150 


001335 






BNE 


13* 


fBR IF NOT DONE YET 


3675 
3676 
3677 










fCHECK 


BCC FOR PRECEDING MESSAGE IN THE BIT WINDOW 


3*'79 


023152 


013700 


027320 




MOV 


CALBCCRO 


I PUT BCC IN RO 
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3679 


023156 


1 U4415 


000001 77S( 


DATACLK 


f 1 




»ShIFT HARDWARE BCC 


36R0 


023162 


006000 




pop 


PO 




»SHIFT SOFT BCC 


3601 


023164 


1 03005 




BCC 


7es 




iBR IF CAPHY CLEAR 


3682 


02il66 


0047 37 


026316 


JSR 


PC ! GETS J 




jLOOK AT BIT WIMDOW 


3683 


0231 7? 


103406 




SCS 


79S 




iBR IF QK t^'ARK) 


3684 


023174 


1 04014 




HLT 


14 




(ERROR, CRC WRONG CSPACE) 


3fi8S 


023176 


000404 




BR 


79$ 




jCONTINUE 


36S6 


023500 


004737 


026315 78S: 


JSR 


PC#GETSI 




ILOOK AT SIT WIMDOW 


3687 


023204 


103001 




BCC 


79$ 




jBR IF OK (SPACE) 


3688 


023206 


104014 




HLT 


14 




(ERROR, CRC WRONG CMARKJ 


3689 


023210 




7981 










2n90 


023210 


00S203 




INC 


R3 




JBUMP BIT COUNTER 


3691 


023212 


022703 


000020 


CMP 


«20fR3 




JFINISHED BCC YET? 


3692 


023216 


00135? 




BNE 


77S 




fBR IF NO 


3693 


23220 


005003 




CLp 


H3 




jCLEAR SIT COUNTER 


3694 
















3695 








rCHECK 


TO SEE IF TRANSMITTER IS MARKING 


3696 
















3697 


023222 


J 04415 


000001 2tl 


DATACLK 


1 1 




ICLOCK TRANSMITTER 


3696 


023226 


0047 37 


026316 


JSR 


PCfGETSI 




(LOOK AT WISDOM 


3699 


023232 


1 03401 




BC5 


31 




fIT SHOULD BE MARKING 


3700 


023234 


1 04024 




HL7 


24 




(ERROR, BX7 WAS A SPACE 


3701 


023236 


005203 


3$ 1 


INC 


R3 




IBUMP BIT COUNTER 


3702 


023240 


022703 


000007 


CMp 


«7,R3 




(DONE YET 


3703 


023244 


00 1 366 






2t 




|BR IF NO 


3704 


023246 


1 04415 


A A A A 1 A 

OQOvlU 




# 10 




(GIVE ENOUGH TICKS TO CLEAR OUT ACTIVE 


370S 


023252 


005003 




CLp 


R3 




(CLEAR BIT COUNTER 


3706 


023254 


104415 


000001 4SI 


DATACLK 


* 1 




(SHIFT OUT NEXT BIT 


3707 


023260 


004737 


026116 


JSP 


PCrGETSI 




(LOOK AT BIT WINDOW 


3708 


n?3364 


1 03401 




BCS 


. + 4 




iBR IF IT IS A MARK 


3709 


023266 


104024 




HLT 


24 




(ERROR, TRANSMITTER IS NOT MARKING 


3710 


0232''0 


005203 




INC 


R3 




(INC BIT COUNT 


371 1 


023272 


022703 


000020 


CMP 


«20fR3 




(DONE YET? 


3712 
3713 


023276 


001 366 




BNE 


41 




(BR IF NO 


371 4 








1 CHECK 


TO SEE THAT 


FIRST FOUR CHARACTER MESSAGE 


3715 
3716 








|WAS RECEIVED COPRECTLlf C , 125 # 252 , 377 ) 


3717 


023300 


104415 


000001 


DATACLK 


1 1 




(GET LAST BIT IN RECEIVER 


3718 


023304 


012703 


000004 


MOV 


«4rR3 




(R3»CHARACTER COUNT 


3719 


02331 


012702 


030102 


HOV 


fMeSDAT,R2 




(LOAD MESSAGE POINTER IN R2 


3720 


023314 


0047 37 


027156 40tt 


JSR 


PCiINRDY 




(WAIT FOR INRDY 


3721 


023320 


104414 




ROMCLK 






(NEXT WORD IS INSTRUCTION, ROMCLK PC«5304 


3722 


023322 


021 204 




021204 






3723 


023324 


016104 


000004 


MOV 


4CRl}rR4 




(PUT "FOUND" IN R4 


3724 


023330 


1 12205 




MOVB 


.(R23 + ,R5 




(PUT "EXPECTED" IN RS 


3725 


023332 


120504 




CHpB 


R5fR4 




(IS RECEIVED DATA CORREC-T? 


3726 


023334 


001401 




BEQ 


41$ 




|BR IF YES 


3727 


023336 


104010 




HLT 


10 




(RECEIVE DATA ERROR 


372S 


2 3 5 4 


005303 


41 $ i 


DEC 


R3 




|DEC CHARACTER COUNT 


3729 


023342 


001364 




BNE 


40$ 




(BR IF NOT DONE YET 


37 30 














37>1 








ICHECK ' 


ro SEE THAT 


IN 


BCC MATCH IS SET 


3732 
3733 








|AND THAT THE BCC WAS 


RECEIVED CORRECTLY 


3734 


023344 


004737 


027156 


JSR 


PCINRDY 




(WAIT FOR INRDY 



DZDME 


MACYll 


30(1046) 


ll-JUL- 


'77 11140 PAGE 71 


DZDME.Pll 12 


-MAY-77 


14118 




BASIC RECEIVER 


3735 


023350 


104414 








3736 


023352 


021204 








3737 


023354 


116137 


000004 


0012S2 




3738 


023362 


042737 


177400 


001252 




3739 


023370 


004737 


027156 






3740 


023374 


104414 








3741 


023376 


021244 








3742 




016104 


OOOOOi 






.374 3 


023404 


042704 


000376 






3744 


023410 


012705 


000001 






3745 


023414 


120504 








3746 


023416 


001401 








3747 


023420 


104015 








3748 


023422 








50$l 


3749 


023422 


104414 








3750 


023424 


021204 








3751 


023426 


116137 


000004 


001251 




3752 


023434 


042737 


000377 


001250 




3753 


023442 


053737 


001250 


001252 




3754 


023450 


023737 


027320 


001252 




3755 


023456 


001401 








3756 


023460 


104027 








3757 












3758 












3759 












3760 












3761 


023462 


012703 


000004 




42tt 


3762 


023466 


012702 


030102 






3763 


023472 


004737 


027156 




43$t 


3764 


023476 


104414 








3765 


023500 


021204 








3766 


023502 


016104 


000004 






3767 


023506 


112205 








3768 


023510 


120504 








3769 


023512 


001401 








3770 


023514 


104010 








3771 


023516 


005303 






44$t 


3772 


023520 


001364 








5775 












■ 3774 












3775 












3??6 












3777 


023522 


004737 


027156 






3778 


023526 


104414 








3779 


023530 


021204 








3780 


023532 


116137 


000004 


001252 




3781 


023540 


042737 


177400 


001292 




3782 


023546 


004737 


027156 






3783 


023552 


104414 








3784 


023554 


021244 








3785 


023556 


016104 


000004 






3786 


023562 


042704 


000376 






3787 


023566 


012705 


000001 






3788 


023572 


120504 








3789 


023574 


001401 








3790 


023576 


104015 









PAGEl 009C 



ROMCLK 




(NEXT WORD IS INSTRUCTION, 


ROMCLK 


PC«5304 


021204 




(GET FIRST HALF OF CRC 






MOVB 


4CRn,TEMP3 


(PUT IN TEMP3 






BIC 


#177400, TSMP3 


(CLEAR HI BYTE 






JSR 


PC, INRDY 


(WAIT FOR INRDY 






ROMCLK 




(NEXT WORD IS INSTRUCTION, 


ROMCLK 


PCBS304 


021244 










HOV 


dfRI) .R4 


(PUT "FOUND" IN R4 






BIC 


1376, R4 


(CLEAR UNWANTED BITS 






MOV 


*1,R5 


(PUT "EXPECTED" IN R5 






CMPB 


RS,R4 


(IS IN BCC MATCH SET? 






BEQ 


S0$ 








HLT 


15 


(IN BCC MATCH ERROR 






ROMCLK 




(NEXT VORD IS INSTRUCTION, 


ROMCLK 


PCV5304 


021204 




(GET LAST HALF 






MOVB 


4(R1),TEMP3«1 


(PUT IN TEMP2 






BIC 


i377,TEHP2 


(CLEAR LO BYTE 






BIS 


TEHP2,TEMP3 


(16 BIT BCC NOW IN TEMP3 






CMP 


CALBCC,TEMP3 


(IS IT CORRECT? 






BEQ 


42$ 


(BR IF OK 






HLT 


27 









(CHECK TO SEE THAT SECOND FOUR CHARACTER MESSAGE 
(WAS RECEIVED CORRECTLY ( , 1 25f 252, 377 } 



MOV 

MOV 

JSR 

ROMCLK 

021204 

MOV 

MOVB 

CMpB 

BEQ 

HLT 

DEC 

BNE 



14, R3 

«MESDAT,R2 
PC, INRDY 



4(Ri),R4 

(R2)+,R5 

R5,R4 

44S 

10 

R3 

43$ 



(R3»CHARACTER COUNT 

(LOAD MESSAGE POINTER IN R2 

(WAIT FOR INRDY 

(NEXT WORD IS INSTRUCTION, ROMCLK PC-5304 

(PUT "FOUND" IN R4 

(PUT "EXPECTED" IN R5 

(IS RECEIVED DATA CORRECT? 

|BR IF YES 

(RECEIVE DATA ERROR 

(DEC CHARACTER COUNT 

(BR IF NOT DONE YET 



(CHECK TO SEE THAT IN BCC HATCH IS SET 
(AND THAT THE BCC WAS RECEIVED CORRECTLY 



JSR 

ROMCLK 

021204 

MOVB 

BIC 

JSR 

ROMCLK 

021244 

HOV 

BIC 

MOV 

CMpB 

BEQ 

HLT 



PC, INRDY 



4(R1},TEMP3 
1177400, TEHP3 
PC, INRDY 



4CRU,R4 

1376, P4 

ll»R5 

R5,R4 

51$ 

15 



(WAIT FOR INRDY 

(NEXT WORD IS INSTRUCTION, ROMCLK PC«5304 
(GET FIRST HALF OF CRC 
(PUT IN TEHP3 
(CLEAR HI BYTE 
(WAIT FOR INRDY 

(NEXT WORD IS INSTRUCTION, ROMCLK PC-5304 

(PUT "FOUND" IN R4 
(CLEAR UNWANTED BITS 
(PUT "EXPECTED" IN P5 
(IS IN BCC MATCH SET? 

(IN BCC MATCH ERROR 
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PAGiLl 0091 



3791 


O23AU0 






3792 


O236'>0 


104414 




37 9 3 


n?3ft02 


021204 




3794 


023fe04 


1 1 61 37 


000004 


3795 


023612 


042737 


000377 


379b 


023620 


053737 


001250 


3797 


023626 


023737 


027320 


379B 


023634 


Ool 401 




3799 


023636 


104027 




3800 


023640 


104400 




3801 








3802 








3803 








3P04 








3805 








3806 








3807 








3808 








3809 








3810 








3811 








3812 








3813 








3814 








3815 








3816 








3817 


023642 


012737 


000053 


3818 


023650 


012737 


025042 


3819 








3820 


023656 


104412 




3821 








3822 








3823 








3824 


023660 


012711 


004000 


3825 


023664 


012704 


030102 


382ft 


023670 


005037 


024004 


3827 


023674 


012700 


000004 


3828 


023700 


004737 


027464 


3829 


02 370 4 


004737 


026502 


3930 


023710 


004537 


027620 


3831 


023714 


030102 




3832 


023716 


000004 




3833 


023720 


004737 


027574 


3834 


023724 


004737 


027544 


3835 


023730 


0O4537 


027620 


3836 


023734 


030102 




3837 


023736 


000004 




3838 


023740 


004737 


027574 


3839 


023744 


004737 


026350 


3840 


023750 


005003 




3841 


023752 


104415 


000022 


3842 


023756 


112405 




3843 


023760 


010502 




3844 








3B45 








3846 









001251 
001250 
001252 
001252 



I2«t 



POMCLK 

021204 

MOVB 

BIC 

BIS 

CMP 

BEO 

HLT 

SCOPE 



4(Rl)rTEMp2+l 

#377,TEMP2 

TEMP2,TEMP3 

CALBCC,TEHP3 

5$ 

27 



jhEXT WORD IS INSTRUCTION, 

IGKT LAST HALF 

;PUT IN TEMP2 

jCLEAR LO BYTE 

116 BIT BCC NOW IN TEMP3 

;IS IT CORRECT? 

;BB IF OK 

ISCOPE THIS TEST 



HOMCLK PCS5304 



I TEST 53 tt***********************^*^^ 

l*DDCNP EDM FUNCTION TEST 

}*THIS TEST LOADS OUT SILO WiTHi 2 SYNCS, 4 CHAR MESSAGE, EOM 
J»SaM,4 CHAR MESS, EDM, THE DATA STREAM IS CHECKED TO BE 
1*4 CHAR,BCC,4 CHAR, 3CC, HARKS, THIS TEST VERJFYS THAT 
r#THE CHARCTERS LOADED WITH EOH SET ARE LOST 
;*ALSO THAT THE CHAR LOADED v4XTH SOH IS NOT IN THE BCC 
|»ALL DATA AND BCC'S ARE CHECKED IN THE BIT WINDOW 
l#THE FOUR CHARACTER MESSAGE IS 0,125,252,377 
|»RECEIVED DATA IS VERIFIED, AND IN BCC MATCH IS CHECKED 
1 1 



»— ' 
MOV 
HOV 



TEST 53 



#53,TSTN0 
»T5T54,NEXT 



I LOAD OUT DATA SILO 



MOV 
MOV 
CLR 
MOV 
JSR 
JSR 
JSR 

MESDAT 
4 

JSR 
JSR 
JSR 

MESDAT 



IBIT11,CR1) 

*MESDAT,R4 

lOS 

*4,R0 

PCSYNLD 

PCOUTRDY 

RSfMESLD 



PC f EDM 
PCSOM 
RSfMESLD 



PC # EOH 

PCOCOR 



4 

JSR 
JSR 

CLR R3 
DATACLK,22 

MOVB CR4)*,R5 

MOV R5,R2 



fRl CONTAINS BASE DMCll ADDRESS 
JMASTER CLEAR DMCll 



)SET LINE UNIT LOOP 

rLOAD POINTER TO DATA 

I CLEAR SOFT BCC 

ILOAD CHARACTER COUNT 

}LOAD 2 SYNCS IN OUT SILO 

fWAIT FOR OUTRDY 

}LOAD SILO WITH 4 CHAP MESS 

7 ADDRESS OF MESSAGE 

J NUMBER OP CHARACTERS 

I LOAD GARBAGE CHARACTER, MITH EOM SET 
7 LOAD GARBAGE CHAR WITH SOM SET 
iLOAD FOUR MORE CHARACTERS 
MDDRESS OF MESSAGE 

I NUMBER OF CHACTERS 

;S£T EOM 

I WAIT FOP OCOR 

jCLEAR BIT COUNTER 

yCLOCK DATA 

}LOAD R5 WITH CHAR 

I LOAD R2 WITH CHAR 



ICHECK FIRST FOUR CHARACTER MESSAGE 
llN THE BIT WINDOW ( , 1 25 > 252 , 377 ) 
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14118 


3847 








3848 


023762 


012737 


120001 


3849 


023770 


010537 


024002 


3850 


023774 


004537 


027212 


38^1 


024000 


000010 




3852 


024O02 


000000 




3853 


024004 


000000 




3854 


024006 


0U737 


027320 


3855 


024014 


104415 


000001 


3856 


024020 


106002 




3857 


024022 


103005 




3858 


024024 


004737 


026316 


3859 


024030 


103406 




3860 


024032 


104006 




3861 


024034 


000404 




3862 


C24036 




02*316 


3863 


024042 


103001 




3864 


024044 


104006 




3865 


024046 






3866 


024046 


005203 




3867 


024050 


022703 


000010 


3868 


024054 


001357 




3869 


024056 


005003 




3870 


024060 


005300 




3871 


024062 


001335 




3872 








3873 








3874 








3875 


024064 


013700 


027320 


3876 


024070 


104415 


OOOOOl 


3677 


024074 


006000 




3878 


024076 


103005 




3879 


024100 


004737 


026316 


3880 


024104 


103406 




3881 


024106 


104014 




3882 


024110 


000404 




3883 


024112 


004737 


026316 


3884 


024116 


103001 




3885 


024120 


104014 




3886 


024122 






3887 


024122 


005203 




3888 


0241 24 


,022703 


000020 


3889 


024130 


001357 




3890 


024132 


005003 




3891 








3892 








3893 








3894 


024134 


005005 




3895 


024136 


010502 




3896 


0241 40 


104415 


000001 


3897 


024144 


10600? 




3896 


024146 


103005 




3899 


024150 


004737 


026316 


3900 


024154 


103406 




3901 


024156 


104006 




3902 


^^24160 


000404 
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MOV 


ICPCi6,XP0LY 


»L0AD POLYNOMIAL 




MOV 


R5,67» 


I LOAD SOFT CHAR FOR BCC 




JSR 


RSfSIMBCC 


iCALCULATE SOFT BCC 




10 




iSHIFT COUNT 


6711 







f CHARACTER 


lOtI 







tOLD BCC 




MOV 


CALBCCilOt 


fLOAD SOFT BCC FOR NEXT SHIFT 


6481 


DATACLKi 


t X 


tSHIFT DATA IN TO BIT WINDOW 




RORB 


R3 


f SHIFT SOFT DATA 




BCC 


65t 


>BR IF A SPACE 




JSR 


PC, GETS! 


tLOOK AT BIT WINDOW 




BCS 


661 


|BR IF OK (MARK) 




HLT 


6 


rERROR, BIT WINDOW WAS A SPACE 




BR 


666 


(CONTINUE 


6§*i 


JSR 


PCGETSI 


iLOOK AT BIT WINDOW 




BCC 


661 


|BR IF OK (SPACE) 




HLT 


6 


lERROR, BIT WINDOW WAS A MARK 


66lt 










IHC 


R3 


fBUMP BIT COUNTER 




CMP 


«10,R3 


tDONE FULL 8 BITS YET 




BNE 


64t 


|BR IF NO 




CLR 


R3 


ICLEAR BIT COUNTER 




DEC 


RO 


(DEC CHARACTER COUNT 




BNE 


13« 


fBR IF NOT DONE YET 



68$l 



69SI 
70$t 



ICHECK BCC FOR PRECEDING MESSAGE IN THE BIT WINDOW 



MOV 


CALBCC,RO 


|PUT BCC IN RO 


DATACLKi 


*1 


1 SHIFT HARDWARE BCC 


ROR 


RO 


r SHIFT SOFT BCC 


BCC 


691 


I BR IF CARRY CLEAR 


JSR 


PC, GETS! 


(LOOK AT BIT WINDOW 


BCS 


70* 


|BR IF OK (MARK} 


HLT 


14 


(ERROR, CRC WRONG C8PACE} 


BR 


70» 


(CONTINUE 


JSR 


PCGETSI 


(LOOK AT BIT WINDOW 


BCC 


70» 


(BR IF OK (SPACE) 


HLT 


14 


(ERROR, CRC WRONG (MARK) 


INC 


R3 


(BUMP BIT COUNTER 


CMP 


120, R3 


(FINISHED BCC YETT 


BNE 


66t 


(BR IF NO 


CLR 


R3 


(CLEAR BIT COUNTER 



(CHECK CHARACTEP LOADED WITH SOM (000), IN THE BIT WINDOW 



CLP R5 
MOV R5,R2 
DATACLK, I 



RORB 
BCC 
JSR 
BCS 

HLT 
BP 



R2 
308 

PCGETSI 

311 

6 

31S 



(CHARACTER LOADED WITH SOM 

[LOAD R2 WITH CHAR 

(CLOCK TRANSMITTER 

(SHIFT SOFT DATA 

(BR IF SPACE 

(LOOK AT BIT WINDOW 

[BR IF OK (HARK) 

(ERROR, BIT WINDOW WAS A SPACE 

[CONTINUE 
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390 3 


024162 


U04737 


0263 lo 


- 


3904 


0241 bfi 


1 n 3001 






3 9 'J 5 


0241 7o 


1 04006 






39 06 


2 4 1 7 2 


005203 




3 1 s : 


39()7 


024 1 74 


(J22703 






3908 


O242'^0 


001357 






3909 


024202 


005003 






39 J n 


024 204 


01 2700 


n ft ft ft fi i 




391 1 


24 21 


012704 






391? 


02421 4 


005037 


02424 




3913 


024220 


1 1 2405 




1 3 $ { 


3914 


024222 


010502 






3915 










391 6 










39 i 7 










3918 


024224 


012737 


120001 


027316 


3919 


024232 


010537 


024244 




3920 


024236 


0n4537 


027212 




3921 


024242 


000010 






3922 


074244 


000000 




76$ t 


3923 


024246 


000000 




list 


392* 


024250 


013737 


027320 


024246 


3925 


024256 


104415 


000001 


738 1 


3926 


024262 


106002 






3927 


024264 


103005 






3928 


024266 


004737 


026316 




3929 


02 4272 


103406 






39 JO 


024274 


104006 






393 1 


024276 


000404 






3932 


024300 


004737 


026316 


74$ 1 




024304 


105001 






3934 


024 306 


1 04006 






3935 


024310 






755 1 


3936 


024310 


005203 






3937 


024 31 2 


022703 


DOUU I U 




39 38 


024 3 16 


001357 






3939 


02432ft 


0OS003 






3940 


024 322 


0053O0 






3941 


024324 


001 335 






3942 










3943 










3944 










3945 


024326 


013700 


027320 




3946 


024332 


1 04415 


u w w u u 1 


77S J 


39 47 


024336 


006000 






3948 


U24340 


103005 






3949 


024342 


004737 


026316 




3950 


024346 


1 03406 






3951 


024350 


1 04014 






3952 


024352 


000404 






3953 


024354 


004737 


026316 


78St 


3954 


024360 


103001 






3955 


024362 


104014 






3956 


024364 






79SI 


3957 


024364 


005203 






395(1 


02436b 


U22703 


000020 





TtSTS 






JSP 


PC* GETSI 


JLODK AT BIT wiMDOw 


BCC 


31S 


fSR If OK (SPACK) 


HLT 


6 


;£iRR0Rf6IT bvINDOW WAS A MARK 


INC 


R3 


;BUMP BIT COU^TER 


CMP 


#10, R3 


J DONE CHAKACTEB YET? 


BNE 


32$ 


»BR IF rjo 


CLr 


R3 


JPESET BIT COUNTER 


MOV 


«4i kO 


jRESET CHARACTER COUNTER 


MOV 


«ME5DATf P4 


jLOAD MESSAGE POINTER 


CLB 


lis 


jclr SOFT acc 


MOVB 


(R43+rR5 


JLOAO CHAR IN R5 


HDV 


R5 > R2 


J LOAD CHAR IS R2 


iCHECK 


SECOND MESSAGE 


IN THE BIT WINDOW C 0* 1 25; 252f 37? } 


MOV 


lCRC16»XP0Ly 


iLOAD POLYNOMIAL 


MOV 


R5f 76S 


;LOAD SOFT CHAR FOR BCC 


JSR 


R5f SIMBCC 


1 CALCULATE SOFT BCC 


10 




J SHIFT COUNT 







CHARACTER 







jOLD BCC 


MOV 


CALBCC,11« 


jLOAD SOFT BCC FOR NEXT SHIFT 


DATACLK 


, 1 


JSHIFT DATA IN TO BIT WINDOW 


RORB 


R2 


(SHIFT SOFT DATA 


BCC 


74$ 


(BR IF A SPACE 


JSR 


PCf GETSI 


jLOOK AT BIT WINDOW 


SCS 


75S 


|BR IF OK (f^ARK) 


HLT 


6 


(EHRORr BIT WINDOW WAS A SPACL 


BR 


75« 


(CONTINUE 


JSR 


PCrGETSI 


(LOOK AT BIT WTNOQW 


BCC 


75$ 


(BR IF OK (SPACE) 


HLT 


6 


(ERROR, BIT WINDOW WAS A MARK 


INC 


R3 


(BUMP BIT COUNTER 


CMP 




(DONE FULL 8 BITS YET 


BNE 


73S 


(BR IF NO 


CLR 


R3 


(CLEAR BIT COUNTER 


DEC 


RO 


(DEC CHARACTER COUNT 


BNE 


13* 


(BR IF NOT DONE YET 


(CHECK 


BCC FOR PRECEDING MESSAGE IN THE BIT WINDOW 


MOV 


CALBCCfRO 


(PUT BCC IN RO 


DATACLK 


f 1 


(SHIFT HARDWARE BCC 


ROR 


RO 


(SHIFT SOFT BCC 


BCC 


78$ 


(BR IF CARRY CLEAR 


JSR 


PCGETSI 


(LOOK AT BIT WINDOW 


BCS 


79$ 


(BR IF OK C«ARK) 


HLT 


14 


(ERROR, CRC WRONG (SPACE) 


BR 


79S 


(CONTINUE 


JSR 


PC r GETS! 


(LOOK AT BIT WINDOW 


BCC 


79$ 


(BR IF OK (SPACE) 


HLT 


14 


(ERROR, CRC WRONG (HARK) 


INC 


P3 


(SUMP BIT COUKTKR 


CMP 


«2D,R3 


(FINISHED BCC YET? 
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-HAT(-77^ 


14118 


3959 


024372 


001357 




3960 


024374 


005003 




3961 








3962 








396 3 








3964 


024376 


104415 


000001 


3965 


024402 


004737 


026316 


3966 


024406 


103401 




3967 


024410 


104024 




3968 


024412 


OOS2U3 




3969 


024414 


022703 


000007 


3970 


024420 


001366 




3971 


024422 


104415 


000010 


3972 


024426 


005003 


3973 


024430 


104415 


000001 


3974 


024434 


004737 


026316 


3975 


024440 


103401 




3976 


024442 


104024 




3977 


024444 


005203 




3978 


024446 


022703 


000020 


3979 


024452 


001366 




39R0 








39S1 








3982 








39R3 








3984 


024454 


104415 


000001 


39H5 


024460 


012703 


000004 


3986 


024464 


012702 


030102 


3987 


024470 


004737 


027156 


3988 


024474 


104414 




3989 


024476 


0212Q4 




3990 


024500 


016104 


000004 


3991 


024504 


112205 




3992 


024506 


120504 




3993 


024510 


001401 




3994 


024512 


104010 




3995 


074514 


005303 




3996 


024516 


001364 




3998 








3999 








4000 








4001 


024520 


004737 


027156 


4002 


024524 


104414 




4003 


024526 


021204 




4004 


024530 


116137 


000004 


4005 


024536 


042737 


177400 


4006 


024544 


004737 


027156 


4007 


024550 


104414 




4008 


024552 


021244 




4009 


074554 


016104 


000004 


4010 


024560 


042704 


000376 


4011 


024S64 


012705 


000001 


4012 


024570 


120504 




4013 


024572 


001401 




4014 


024574 


104015 
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BNE 
CLR 



PAGEl 0094 



40$l 



001252 



77$ 
R3 



(BR ir NO 

(CLEAR BIT COUNTER 



(CHECK TO SEE IF TRANSMITTER IS MARKING 



DATACLK, 
JSR 
BCS 
HLT 
INC 
CMP 
BNE 

DATACLK, 
CLR R3 
DATACLK, 



JSR 
BCS 
HLT 
INC 
CMP 
BNE 



1 (CLOCK TRANSMITTER 

PC#GETSI (LOOK AT WINnnu, 

3$ (IT SHOULD BE MARKING 

24 (ERROR, BIT WAS A SPACE 
R3 (BUMP BIT COUNTER 
»7,R3 (DONE YET 

25 (BR IF NO 
10 (GIVE ENOUGH TICKS TO CLEAR OUT ACTIVE 

(CLEAR BIT COUNTER 

1 (SHIFT OUT NEXT BIT 

PCGETSI (LOOK AT BIT WINDOW 

.♦4 (BR IF IT IS A MARK 

24 (ERROR, TRANSMITTER IS NOT MARKING 

R3 (INC BIT COUNT 

#20, R3 (DONE YET? 

4S jBR IF NO 



(CHECK TO SEE THAT FIRST FOUR CHARACTER MESSAGE 
(WAS RECEIVED CORRECTLY (0,125,252,377) 



DATACLK, 
MOV 
MOV 
JSR 
RONCLK 
021204 
MOV 
MOVE 
CMpB 
BEQ 
HLT 
DEC 



*4,R3 

«M£SDAT,R2 
PCINRDY 



4(RniR4 
CR2)+,R5 
R5,R4 
41* 
10 
R3 



(GET LAST BIT IN RECEIVER 
(RJbCHARACTER COUNT 
(LOAD MESSAGE POINTER IN R2 
(WAIT FOR INRDY 

(NEXT WORD IS INSTRUCTION, ROMCLK PCp5304 

(PUT "FOUND" IN R4 

(PUT "EXPECTED" IN R5 

(IS RECEIVED DATA CORRECT? 

(BR IF YES 

(RECEIVE DATA ERROR 

(DEC CHARACTER COUNT 

joR IF Kiur DONE lET 



(CHECK TO SEE THAT IN BCC MATCH IS SET 
(AND THAT THE BCC WAS RECEIVED CORRECTLY 



JSR 

ROMCLK 
021204 
MOVB 

aic 

JSR 

ROMCLK 

021244 

MOV 

BIC 

MOV 

CMpB 

BEQ 

HLT 



PCINRDY 



4(R1 J,TEMP3 
•177400, TEMP3 
PCINRDY 



4(R1},R4 

f 376,R4 

• liR5 

R5,R4 

SO* 

15 



I WAIT FOR INRDY 

(NEXT WORD IS INSTRUCTION, ROMCLK PC»5304 
(GET FIRST HALF OF CRC 
(PUT IN TEMP3 
(CLEAR HI BYTE 
(WAIT KOR INRDY 

(NEXT WORD IS INSTRUCTION, ROMCLK PC«5304 

(PUT "FOUND" IN R4 
(CLEAR UNWANTED BITS 
(PUT "EXPECTED" IN R5 
(IS IN BCC HATCH SET? 

(IN BCC HATCH ERROR 
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4015 
4016 
4017 
401fl 
4019 
4020 
40?1 
4()?2 
4023 
4024 
4025 
4026 
4027 
402« 
4029 
4030 
4031 
4032 
4033 
4034 
4035 
4036 
4037 
4038 
4039 
4040 
4041 
4042 
4043 
4044 
4045 
4046 
4047 
4048 
4049 
4050 
4051 
4052 
4053 
4054 
4055 
4056 
4057 
4058 
4059 
4060 

4061 
4062 
4063 

4064 
4065 
4066 
4067 
4068 
4669 
4070 



02457b 
024576 
024600 
024602 
024610 
024616 
024624 
024632 
OP4634 



024646 
024652 
024654 



024662 
024666 
024672 
024676 
024700 
024702 
024706 
024710 
024712 
024714 
024716 
024720 



024722 
024726 
024730 



024762 
024766 
024772 
024774 
024776 
025000 
025000 



104414 






POMCLK 




pvEXT WORD IS INSTRUCTION, 


021 204 






021204 




tget last half 


1 16137 


000004 


001251 


MOVH 


4(R1 )#TEMP2+1 


SPUT IN TEMP2 


042737 


000377 


001250 


BIC 




fCLEAR LO BYTE 


0537 37 


001250 


001252 


BIS 




;16 BIT BCC NOW IN TEMP3 


023737 


027320 


00125 2 


CMp 






001401 








45 S 




104027 






HLT 


27 










1 CHECK 






004737 


027156 




4581 JSB 


PC#INPDY 


»WAIT FOR INROY 


104414 






ROMCLK 




INEXT WOPD IS INSTRUCTION, 


021204 






021204 




|GET RECEIVE DATA 


016104 


000004 




MOV 


4tRl)»R4 


jPUT "FOUND" IN R4 


005005 






CLR 


R5 


»PUT "EXPECTED" IN R5 


120504 






CMPB 


R5f R4 


;IS RECEVIED DATA CORRECT? 


001401 






BEQ 


42$ 


J BP IF YES 


104010 






HLT 


10 


f RECEIVE DATA ERROR 








1 CHECK 


TO SEE THAT SECOND FOUR CHARACTER MESSAGE 



ROMCLK PCB5304 



054732 J16137 
0J4740 042737 
024746 004737 



fWAS RECEIVED CORRECTLY (0,125,252,377) 



012703 
012702 
004737 
104414 
021204 
016104 
112205 
120504 
001401 
104010 
005303 
001364 



004737 
104414 
021204 



000004 
030102 
027156 



42$t 
43$t 



MOV 
MOV 
JSR 

ROMCLK 

021204 

MOV 

MOVB 

CMpB 

BEQ 

HLT 

DEC 

BNE 



14, R3 

#MESDAT,R2 
PCINRDY 



4(Ri},R4 

CR2)+,R5 

R5,R4 

44« 

10 

R3 

431 



rR3«CHARACTER COUNT 

jLOAD MESSAGE POINTER IN R2 

I WAIT FOR INRDY 

;NEXT MORD IS INSTRUCTION, ROMCLK PCb5304 

»PUT •FOUND" IN R4 

JPUT "EXPECTED" IN R5 

lis RECEIVED DATA CORRECT? 

JBR IF YES 

y RECEIVE DATA ERROR 

;DEC CHARACTER COUNT 

J BR IF NOT DONE YET 



ICHECK TO SEE THAT IN BCC HATCH IS SET 
|AND THAT THE BCC WAS RECEIVED CORRECTLY 



000004 001252 
177400 001252 
027156 



024752 104414 
024754 021244 
024756 016104 000004 



JSR PCINRDY 

ROMCLK 

021204 

MOVB 4{Rn,TEHP3 

BIC 1177400, TEHP3 

JSR PCINRDY 

ROMCLK 
021244 

MOV 4CR1),P4 



042704 000376 
012705 000001 
120504 
001401 
104015 



BIC 

MOV 

CMPB 

BEQ 

HLT 

ROMCLK 



#376, R4 

»1,R5 

P5,R4 

51$ 

15 



I WAIT FOR INRDY 

fNEXT WORD IS INSTRUCTION, ROMCLK PC«5304 
»GET FIRST HALF OF CRC 
J PUT IN TEMP3 
ICLEAR HI BYTE 
J WAIT FOR INRDY 

jNEXT WORD IS INSTRUCTION, ROMCLK PC=5304 

IPUT "FOUND* IN R4 

fCLEAR UNWANTED BITS 
jPUT "EXPECTED" IN R5 
fIS IN BCC MATCH SET? 

I IN BCC MATCH ERROR 

INEXT WORD IS INSTRUCTION, RQHCLK PC«5304 
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4071 
4072 
4073 
4074 
4075 
4076 
4077 
4078 
4079 
4090 
4081 
40R2 
4083 
4084 
4085 
4086 
4087 
4088 
4089 
4090 
4091 
4092 
4093 
4094 
4095 
4096 
4097 
4098 
4099 
4100 
4101 
4102 
4103 
4104 
4105 
4106 
4107 
4108 
.4109 
4110 
4111 
4113 
41t3 
4114 
4115 
4116 
4117 
4118 
4119 
4120 
4121 
4122 
4123 
4124 
4125 
41,26 



025002 
025004 
025012 
025020 
025026 
025034 
025036 
025040 



021204 
116137 
042737 
053737 
023737 
001401 
104027 
104400 



025042 
025050 

025056 
025060 
025064 
025070 
025074 
O25100 
025104 
025110 
025112 
025114 
025120 
025124 
025130 
025132 
025134 
025140 
025144 
025146 
025150 
025156 
025160 
025162 
025166 
025172 
025174 
025176 
025302 
025204 
025206 
025210 
025212 
025214 
035216 



000004 
000377 



012737 
012737 

104412 
012711 
012702 
012700 
004737 
004737 
004537 
030102 
000004 
004737 
104415 
004537 
030102 
000004 
004737 
104415 
104414 
021264 
032761 
001401 
104034 
104415 
004737 
104414 
021204 
016104 
112205 
130504 
001401 
104010 
005300 
001364 
0U4737 



001251 
001250 



001250 001252 
027320 001252 



5$t 



021204 

MOVB 

BIC 

BIS 

CMP 

BEQ 

HLT 

SCOPE 



4CRn,TEHP2tl 

f377,TEMP2 

TEMP2,TEMP3 

CALBCC,TEMP3 

5S 

27 



fGET LAST HALF 

|PUT IN TEMP2 

fCLEAR LO BYTE 

|16 BIT BCC NOW IN TEMP3 

J IS IT CORRECT? 

I BR IF OK 

I SCOPE THIS TEST 



}*••**«*««««•»**«««*•»#««««« TEST 54 *««**«««*««««*•**••#«•«*»*« 

|#EMPTY SILO TEST 

l*LOAD SILO WITH 2 SYNCS, 4 CHAR MESSAGE, SINGLE CLOCK 
|*UNTIL THE SILO IS EMPTY, LOAD 4 MORE CHARACTERS IN THE 

y#SfLO, CIVt MOPE TICKS* VSRIfY "HAT CNL^ "KE rXK5I 

1*4 CHARACTER MESSAGE WAS RECEIVED AND THAT RTS IS CLfciAR 









» TEST 


54 




000054 


001226 


TST541 


MOV 


t54,TSTN0 




025274 


001216 




MOV 


|T8T55,NEXT 


yRt C'ONTAINS BASE DMCll ADDRESS 


















M8TCLR 




^MASTER CLEAR DMCll 


004000 






MOV 


♦ BITll,(Rn 


ySET LINE UNIT LOOP 


030102 






MOV 


iMESDAT,R2 


»R2 POINTS TO MESSAGE 


000004 






MOV 


«4,R0 


}R0 » CHAR COUNT 


027464 






JSR 


PCSYNLD 


fLOAD SILO WITH TWO SYNCS 


026502 






JSR 


PCOUTRDY 


J WAIT FOR OUTRDY 


027620 






JSR 


RSrHESLD 


J LOAD MESSAGE IN SILO 








NESDAT 




f START OF MESSAGE 








4 




^CHARACTER COUNT 


026350 






JSR 


PCQCOR 


I WAIT FOR OCOR 


000065 






DATACLK, 


63 


jCuOCK DATA (EMPTY SILO) 


027620 






JSR 


PSfMESLD 


fPUT MORE CHARACTERS IN SILO 








MESDAT 




026350 






4 

JSR 


PC#OCOR 




000005 






DATACLK, 


5 


rCLOCK UNTIL RTS IS CLEARED 








ROMCLK 




|NEXT WORD IS INSTRUCTION, ROMCLK 








031264 




|GET RTS 


000040 


000004 




BIT 


IBIT5,4(R1} 


rIS IT CLEAR? 








BEQ 


5S 


|BR IF YES 








HLT 


34 


f ERROR, RTS NOT CLEAR 


000041 




5$1 


DATACLK, 


41 


fCLOCK XMITTER SOKE MORE 


027156 




l$t 


JSR 


PCINRDY 


jQK LETS CHECK WHAT WAS RECEIVED 








ROMCLK 




}NEXT WORD IS INSTRUCTION, ROMCLK 








021204 




fGET RECEIVE DATA 


000004 






MOV 


4(Rn,R4 


fPUT IT IN R4 








MOVB 


(R2}4,R5 


fR5 ■ "EXPECTED" 








CMPB 


R5,R4 


lis DATA CORRECT? 








BEQ 


2$ 


|BR IF OK 








HLT 


10 


)DATA ERROR 






211 


DEC 


BO 


;UEC CHAR COUNT 


027156 






BNE 


19 


fBR IF NOT DONE YET 




3SI 


JSR 


PCINRDY 


;WAIT FOR INRDY 
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4127 
4128 
4129 
41 30 
4131 
4U2 
4US 
4114 
4115 
4136 
4137 
413B 
4139 
4140 
4141 
4142 
4143 
4144 
4145 
4146 
4147 
4148 
4149 
4150 
4151 
4152 
4153 
4154 
4155 
4156 
4157 
4158 
4159 
4160 
4161 
4162 
4163 
4164 
4165 
4166 
4167 
4166 
4169 
4170 
4l7t 
4172 

4173 
4174 
4175 
4176 
4177 
4178 
4179 
4180 
4lKi 
4183 



025222 
025224 
02522b 
025232 
025236 
025240 
025242 
025244 
025250 
025252 
025254 
02S260 
025264 
025266 
025270 
025272 
025272 



104414 










jNiiXT WORD IS INSTRUCTION^ RQMCLK 


PCs53Q4 


02120 4 










(tif-'T BPTTTVF nATiV 




016104 


000004 








iPUT IT IM "Fniiwn" 

} r V I XI X vi rUUrrU 




012705 


3 7 7 




MOy 


i 3 77 # R5 






120504 






CHpB 


P5 f H4 


J SHOULD fiEt m 




001401 






BEQ 


4» 


jbR IF OK 




10401G 






HLT 


10 


» ERROR, TRANSMITTER DID NOT ABORT 




004737 


027156 


4Si 


JSR 


PC? INPDY 


JWAIT FOR iNRDlf 




104414 






ROMCLK 




|NEXT WORD IS INSTRUCTION, ROKCLK 


PCIS304 


021204 






021204 




|GET RECEIVE DATA 




016104 


000004 




MOV 




JPUT IT IN "FOUND" 




0127 05 


000377 




MQV 


S377iR5 


•P.5 « "EXPECTED" 




120504 






CMpe 


R5«R4 


ISHOULD SEE 377 




001401 






BEQ 


10$ 


»BR IF OK 




104010 






HLT 


10 


ISRROR, TRANSMITTER DID NOT ABORT 




104400 




iOtt 


SCOPE 




(SCOPE THIS TEST 





025274 
025302 

025310 
025312 
025316 
1325322 
025330 
025332 
025334 
025340 
025344 
O25350 
025352 
025354 
025360 
025364 
025366 
025370 

025374 
025400 
025402 
025404 
025406 
025410 



TEST 55 •#«•*«*«**«**••«*«««*««*•*« 

|*HALF DUPLEX TEST 

fttSET IdlNE UNIT LOOP AND HALF DUPLEX, SEND SYNCS AND A 
|*MES3AGC, VERIFY THAT IN-ACTIVE AND IN-READY ARE CLEAR 









1 TEST 


55 




012737 


000055 


001226 


TST55t HOV 


|55#TSTN0 




012737 


025412 


001216 


MOV 


|T5T56,NEXT 














fRl CONTAINS BASE DMCU ADDRESS 


104412 






HSTCLR 




(MASTER CLEAR DMCll 


012702 


000012 




MOV 


»12*R2 


(SAVE R2 FOR TYPEOUT 


012711 


004000 




MOV 


#BIT11,(R1) 


(SET LINE UNIT LOOP 


012761 


000020 


000004 


MOV 


#BIT4,4CR1) 


(LOAD P0RT4 


104414 






ROMCLK 




(NEXT WORD IS INSTRUCTION, ROMCLK PCb5304 


122113 






122113 




(SET H/D BIT 


004737 


027464 




JSR 


PCSYNLD 


(LOAD 2 SYNCS 


004737 


026502 




JSR 


PCOUTRDY 


(WAIT FOR OUTROY 


004537 


027620 




JSP 


R5,MESLD 


(LOAD 4 CHAR MESSAGE 


030102 






HESDAT 




(ADDRESS OF MESSAGE 


G00004 






4 




(CHARACTER COUNT 


004737 


026350 




JSR 


PC»OC0R 


(WAIT rOR QCOR 


104415 


000073 




DATACLK 


# 73 


(SEND MESSAGE 


104414 






ROMCLK 




(NEXT WORD IS INSTRUCTION, ROMCLK PCb5304 


021244 






021244 




(READ LU-12 


016104 


000004 




HOV 


4CRl)fR4 


(PUT "FOUND" IN R4 


042704 


000257 




BIC 


»257fR4 


(CLEAR UNWANTED BITS 


005005 






CLR 


R5 


(R5 » "EXPECTED" 


120504 






CMPB 


R5fR4 


(IN-ACTIVE AND IN-RDY SHOULD BE CLEAR 


001401 






BEQ 


IS 


(SR IF OK 


104039 






HLT 


35 


(ERROR BOTH ARE NOT CLEAR 


104400 






ill SCOPE 







(««*•«*««*««•««»•««*«««-«««•» TEST 56 ««*«««*«**•**«•#*«-*•«««**•* 

(ttDDCMP CABLE DATA TEST 



DZDME 


MACYll 


30tl046) 


ll-JUL 


•77 111 


40 PAGE 79 ' 






PAGE! 


DZDWE.Pll 12 


-MAY-77 


14118 




BASIC RECEIVER 


TESTS 






4183 












)«THIS 


TEST LOADS OUT 


SILO WITH THE FOLLOWING! 


4184 












1*4 SYNCS, 16 CHARfEOM 


16 CHAR,E0M,16 CHAR,EOM 


4185 












t*THE 16 CHARACTERS INCLUDE A FLOATING ONE AND ZERO 


4186 












(«THE DATA IS TRANSMITTED OVER THE CABLE USING THE INTERNAL CLOCK 


4187 












(«RECEIVED DATA IS VERIFIED AS IS IN BCC MATCH 


4188 












ftLDOP- 


BACK CONNECTOR 


MUST BE ON TO RUN THIS TEST 


4189 
4190 












f 1 ***«««#*«»«««#»«»****'»*««««#««•»«««»«*«#«««««*•**»«»»«*«*«***» 


4191 












» TEST 


56 




4192 


















4193 


U25412 


012737 


000056 


001226 


TST56I 


MOV 


l56rTSTN0 




4194 


025420 


012737 


026000 


001216 




MOV 


ITST57,NEXT 




4195 
















(Rl CONTAINS BASE DMCll ADDRESS 


4196 


025426 


104412 








MSTCLR 




(MASTER CLEAR DMCll 


4197 


025430 


032737 


040000 


001366 




BIT 


iBIT14,5TATl 


(SKIP TEST IF NO 


4198 


075436 


001557 








BEQ 


3t 


(L00P6ACK CONNECTOR ON 


4199 


025440 


012711 


004000 






MOV 


»BIT11«CR13 


(SET LINE UNIT LOOP 


4200 


025444 


004737 


027464 






JSR 


PCSYNLD 


(LOAD 2 SYNCS 


4201 


025450 


004737 


027464 






JSR 


PCSYNLD 


(LOAD 2 MORE SYNCS 


4202 


025454 


012737 


120001 


027316 




MQV 


ICRC16,XP0LY 


(LOAD POLYNOMIAL FOR SOFT CRC CALC 


4203 


025462 


005037 


025512 






CLR 


6« 


(CLEAR OLD BCC 


4204 


025466 


012703 


000020 






MOV 


«16.fR3 


(CHARACTER COUNT 


4205 


025472 


012702 


030106 






MOV 


»rLTDATjR2 


jR2» POINTER 


4206 


025476 


112237 


025510 




7SI 


MOVB 


CR2}'I'#59 


(LOAD CHAR FOR SOFT BCC CALC, 


4207 


025502 


004537 


027212 






JSR 


R5#SIHBCC 


(CALC SOFT BCC 


4208 


025506 


000010 








10 




(SHIFT COUNT 


4209 


025510 


000000 






SSI 







(CHARACTER 


4210 


025512 


000000 






6»t 







(OLD BCC 


4211 


025514 


013737 


027320 


035512 




MOV 


CALBCC,6a 


(LOAD OLD BCC 


4212 


025522 


005303 








DEC 


R3 


(DEC COUNT 


4213 


025524 


001364 








BNE 


71 


(BR IF NOT DONE YET 


4214 


025526 


004537 


027620 






JSR 


RSfKESLD 


(LOAD SILO 


4215 


025532 


030106 








FLTDAT 




(MESSAGE ADDRESS 


4216 


025534 


000020 








16. 




(CHARACTER COUNT 


4217 


025536 


004737 


027574 






JSR 


PC, EDM 


(LOAD AN EOM 


4218 


025542 


004537 


027630 






JSR 


RSfMESLD 


(LOAD SILO 


4219 


025546 


030106 








FLTDAT 




(MESSAGE ADDRESS 






fiOGS2Q 








1* = 




fCHARACTER COUNT 


4221 


025552 


004737 


027574 






JSR 


PCfEOM 


(LOAD AN EOM 


4222 


025556 


004537 


027620 






JSR 


RSfKESLD 


(LOAD SILO 


422> 


025562 


030106 








FLTDAT 




(MESSAGE ADDRESS 


4224 


025564 


000020 








16. 




fCHARACTER COUNT 


4225 


025566 


004737 


027574 






JSR 


PCfEOM 


(LOAD AN EOM 


4226 


025572 


004737 


026350 






JSR 


PC,OCOR 


(WAIT FOR OCOR 


4227 


025576 


005011 








CLR 


CR13 


(CLEAR LINE UNIT LOOP 


4238 


025600 


012700 


000003 






HOV 


• 3fR0 


(RO a MESSAGE COUNT 


4229 


025604 


012703 


000030 






MOV 


116. fR3 


|R3« CHARACTER COUNT 


4230 


025610 


012702 


030106 






MOV 


IFLTDAT,R2 


(LOAD MESSAGE POINTER IN R3 


4231 


025614 


004737 


027156 




Itl 


JSP 


PC/INRDY 


(WAIT FOR I^JRDY 


4232 


025630 


104414 








ROMCLK 




(NEXT WORD IS INSTRUCTION, ROMCLK PC«5304 


4233 


025622 


021204 








021204 




(GET DATA FROM IN SILO 


4234 


025624 


016104 


000004 






MOV 


4CR1),R4 


(PUT CHARACTER IN "FOUND" 


4235 


025630 


113205 








HOVB 


CR2)+»R5 


(PUT "EXPECTED" IN P5 


4236 


025632 


120504 








CMPB 


R5rR4 


(IS RECEIVED DATA CORRECT 


4237 


025634 


001401 








BEQ 


2S 


(BR IF OK 


4238 


025636 


104025 








HLT 


25 


(DATA ERROR 



0098 
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4239 


0256 40 






42 4 


0756 4 


005 30 3 




4 241 


(12564 2 


001364 




424 2 


256 44 


012703 


A A A AO n 


4243 








4 24 4 








4245 








4 2 46 










02565f^ 


0C4737 


_ 

027 156 


4248 


02565 4 


^ AAA 1 A 




4249 


025 $56 


21204 




4250 


025660 


116137 


A A A A A A 




025 666 




1 77400 


^= » 


025674 




0271 56 


4 25 3 


? 5 7 


* AAi A 






'^^^^^'^ 


il AA 




4255 


2 5 7 i 




An AAnA 


4256 


025710 




000376 




025714 


127 5 


AA Annl 


*^58 


025720 


120504 




4259 


025722 






4260 


025724 


104015 












426 2 


0257 26 


104414 




426 3 


025730 


021 204 






025732 


116137 


AA AAAA 


4265 


025740 


042737 




4266 


257 46 


0537 37 


001 250 


4267 


025754 


023737 


027 330 


4266 


025762 


001401 




4259 


02576 4 


104027 




427 


025766 


1 2 7 2 


030106 


4271 


025772 


005300 






02577 4 


001 307 






025776 


4 n A A A A 




4 2 7 4 








4275 








42 76 








4277 








427B 








4779 








4280 








4281 








4282 








428 3 








478 4 








4285 








4286 








4287 


026000 


012737 


000057 


428B 


026006 


012737 


003364 


4289 








4290 


026014 


104412 




4291 


026016 


03273? 


040000 


4292 


026024 


001533 




4293 


026026 


012711 


004000 


4294 


i>26032 


004737 


027464 



001252 
001252 



4$1 
381 



DEC 


P3 


»DEC CHARACTER COUNT 






1$ 


yBR IF NOT DONE THiS MESSAGE 


MOV 


il6wP3 






KHECK 


TO SEE THAT IN 


BCC MATCH IS SET 




|AND THAT THE BCC WAS 


RECEIVED CORRECTLY 




JSP 




1 >*AIT FOR INRDY 




POMCLK 




(NEXT WORD IS INSTRUCTION! 


POMCLK 


021204 




(GET FIRST HALF OF CRC 




HOVB 


4tRnfTEMP3 


jPUT IN TEMP3 




BIC 


f 177400»TEMP3 


jCLEAR HI BYTE 




J5R 


PC#INPDY 


;MAIT FOR INRDY 




ROMCttK 




(NEXT WORD IS INSTRUCTION, 


ROMCLK 


021244 








MOV 


4CR1),B4 


t PUT "POUHn* TM RA 




BIC 


#376, P4 






MOV 


»l,R5 


(PUT "EXPECTED" IN R5 




CMPB 


PSf R4 






BEQ 


25S 






HIT 


15 


fIN B^r MATTH CBROB 




POMCLK 




f NEXT WQBn TS T MSTPUrTTflM . 


RHMfT.IC 


031204 




(GET LAST HALF 




MOVB 


4fRl)»TEWP2+l 


(PUT IN TEMP2 




BIC 


#377,TEMP3 


(CLEAR LO BYTE 




BIS 


TEMP2#TEMP3 


(16 BIT BCC NOW IN TEMP3 




CMP 


CALBCC,TEMP3 


(IS IT CORRECT? 




BEO 


4« 


(BR IF OK 




HLT 


27 






MOV 


iFLTDAT,P2 


(RESET MESSAGE POINTER 




DEC 


RO 


(DECREMENT COUNTER 




BNE 


18 


' (BR IF NOT DONE 




SCOPE 




(SCOPE THIS TEST 





(»*»*»«««««««««-«»««««•«»«»** TEST 57 «*««**«««****«*«#«««««*«*»* 

(#DDCMp CABLE DATA TEST 

(#THIS TEST LOADS OUT SILO WITH THE FOLLOiflNGi 

(«4 SYNCSr59 DATA CHARACTERS, EOM WITH GARBAGE CHARACTER 

(«THE DATA IS TRANSMITTED OVER THE CABLE USING THE INTERNAL CLOCK 

(♦RECEIVED DATA IS VERIFIED AS IS IN BCC MATCH 

(#LOOP-BACK CONNECTOR MUST BE ON TO RUN THIS TEST 

(t *•*»***«*»««««•**»*»»«*«*«*»*»#«*«*«**»****«»•«***#*•»«*««»««« 



I TEST 
I— — 

MOV 
MOV 

MSTCLP 

BIT 

BEO 

MOV 

JSR 



I57,TSTN0 
»,EOP,NEXT 



IBIT14#STATI 
38 

|B1T11,(R1) 
PCSYNLD 



(Rl CONTAINS BASE DMCll ADDRESS 

(MASTER CLEAR DMCll 

(SKIP TEST IF NO 

(LOOPBACK CONNECTOR ON 

(SET LINE UNIT LOOP 

(LOAD 3 SYNCS 
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4295 


036036 


004737 


027464 






JSR 


PCSYNLD 


(LOAD 3 MURE SYNCS 


4296 


026042 


012737 


120001 


027316 




MOV 


ffCRC16rXP0LY 


(LOAD POLYNOMIAL FOR SOFT CRC CALC 


4297 


026050 


005037 


026100 






CLR 


68 


(CLEAR OLD BCC 


4298 


026054 


012703 


000073 






KOV 


159. ,R3 


(CHARACTER COUNT 


4299 


r»26o60 


012702 


030102 






MOV 


fHESDAT,R3 


(R3« POINTER 


4300 


026064 


112237 


026076 




781 


MOVB 


(R2)+,5$ 


(LOAD CHAR FOR SOFT BCC CALC« 


4301 


026070 


004537 


027212 






JSR 


R5,SIMBCC 


(CALC SOFT BCC 


4302 


026074 


000010 








10 




(SHIFT COUNT 


4303 


026076 


000000 






581 







(CHARACTER 


4304 


026100 


000000 






681 







(OLD BCC 


4305 


026102 


013737 


027J20 


036100 




MOV 


CALBCCfiS 


(LOAD OLD BCC 


4306 


026110 


005303 








DEC 


R3 


(DEC COUNT 


43u7 


026112 


001364 








BNE 


78 


(BR IF NOT DONE YET 


4308 


026114 


004537 


037620 






JSR 


RSfMESLD 


(LOAD SILO 


4309 


026120 


030102 








MESDAT 




(MESSAGE ADDRESS 


4ilU 


026122 


000073 








59, 




(CHARACTER COUNT 


4311 


026124 


004737 


027574 






JSR 


PC, EDM 


(LOAD AN EOM 


4312 


026130 


004737 


026350 






JSR 


PCOCOR 


(WAIT FOR OCOR 


4313 


026134 


005011 








CLR 


CRi) 


(CLEAR LINE UNIT LOOP 


4314 


026136 


012700 


000073 






MOV 


i59MR0 


(R0» CHARACTER COUNT 


4315 


026142 


012702 


030103 






MOV 


|MESDAT,R3 


(LOAD MESSAGE POINTER IN R2 


4316 


026146 


004737 


027156 




111 


JSR 


PCIHRDY 


(WAIT FDR INRDY 


4317 


026152 


104414 








ROKCLK 




(NEXT WORD IS INSTRUCTION, POMCLK PCb5304 


4318 


026154 


021204 








031204 




|CCT DATA FROM IN SILO 


4319 


026156 


016104 


000004 






MOV 


4(Rn,R4 


(PUT CHARACTER IN "FOUND" 


4320 


026162 


112205 








MOVB 


CR3)+,R5 


(PUT "EXPECTED" IN R5 


4321 


026164 


120504 








CMPB 


R5iR4 


lis RECEIVED DATA CORRECT 


4322 


026166 


001401 








BEQ 


28 


(BR IF OK 


4323 


026170 


104025 








HLT 


25 


(DATA ERROR 


4324 


026172 








3lt 






4325 


026172 


005300 








DEC 


RO 


(DECREMENT COUNTER 


4326 


026174 


001364 








BNE 


18 


(BR IF NOT DONE 



4327 
4328 
4329 
4330 
4331 
4332 
4333 
4334 
4335 
4336 
4337 
4338 
4339 
4340 
4341 
4342 
4343 
4344 
4345 
4346 
4347 
4348 
4349 
4350 



(CHECK TO SEE THAT IN BCC HATCH IS SET 
(AND THAT THE BCC WAS RECEIVED CORRECTLY 



026176 


004737 


037156 




JSR 


PCf INRDY 


(WAIT FDR JNRDY 


026202 


104414 






ROMCLK 




(NEXT WORD IS INSTRUCTION! 


026304 


021204 






031204 




(GET FIRST HALF OF CRC 


026306 


116137 


000004 


001392 


MOVB 


4CR1)»TEMP3 


(PUT IN TEMP3 


026214 


042737 


177400 


001353 


BIC 


#177400, TEMPI 


(CLEAR HI BYTE 


026222 


004737 


037156 




JSR 


PC, INRDY 


(WAIT FOR INRDY 


026226 


104414 






ROMCLK 




(NEXT WORD IS INSTRUCTION, 


026230 


021344 






031344 






026232 


016104 


000004 




MOV 


4CRn»R4 


(PUT "FOUND" IN R4 


026236 


042704 


000376 




BIC 


1375, R4 


(CLEAR UNWANTED BITS 


026242 


012705 


000001 




MOV 


• 1,P9 


(PUT "EXPECTED" IN R5 


026346 


120504 






CHPB 


R5,P4 


(IS IN BCC MATCH SET? 


026250 


001401 






BEQ 


258 




026252 


104015 






HLT 


15 


(IN BCC MATCH ERROR 


026254 








2511 






026254 


104414 






ROMCLK 




(NEXT WORD IS INSTPUCTIONi 


026256 


621204 






021204 




(GET LAST HALF 


026360 


116137 


000004 


001351 


MOVB 


4CR1),TEMP3*1 


(PUT IN TEMP3 


026266 


042737 


000377 


0013S0 


BIC 


t377,TEMP2 


(CLEAR LO BYTE 


026274 


053T37 


001350 


001353 


BIS 


TEMP2,TEMP3 


(16 BIT BCC NOW IN TEMPI 
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4351 


02^302 


023737 


027320 


001252 




4352 


026310 


OUl 401 








435 3 


2 6 3 1 J 


3 04027 








4354 


02631 4 


1 04400 








4355 










00300 


4356 










00400 


4357 










00500 


435S 










00600 


4359 










00700 


4360 


026316 








00800 


4361 










00900 


4362 










01000 


436 3 










01 100 


4 364 


026316 


104414 










026320 


21364 






01300 




026322 


017737 


15 3064 


026346 


01400 


436 7 


026330 


106137 


026 346 




01500 


lata 


026334 


1 061 37 


026346 




01600 


TO 


026 340 


106137 


026346 




01700 




026344 


000207 






01800 


All 1 


026346 


000000 






01900 


4 3 < 2 










02000 


4 3 73 










02100 


4 374 


026 35 








02200 


4375 










02300 


4376 










02400 


4377 


026350 


104414 








4376 


026352 


021 364 






02600 


4379 


026 354 


032777 


000020 


1S3030 


02700 


4380 


026362 


001 772 






02800 


438 i 


026364 


000207 






02900 


436 2 










03000 


4383 










03100 


4394 


026366 








03200 


4385 










03300 


4386 










03400 


438? 










03500 


4388 










03600 


4369 


026366 


01 3637 


001246 




03700 


4390 


026372 


062746 


000002 




03800 


4391 


026376 


012761 


000026 


000004 


03900 


4392 


076404 


4 04 414 








419 3 


026406 


122] 14 






04100 


4394 


026410 


004737 


026502 




04200 


4 395 


026414 


012761 


OOOOOi 


000004 


04300 


4 396 


026422 


104414 








4397 


026424 


122111 






04500 


439P 


026426 


012761 


000026 


000004 


04600 


4399 


026434 


104414 








4400 


026436 


122110 






04800 


4401 


026440 


005337 


001246 




04900 


4402 


026444 


001361 






05000 


4403 


026446 


004737 


026502 




OSlOO 


4404 


026452 


005061 


000004 




05200 


4405 


026456 


104414 








4406 


026460 


122111 






05400 



CMp 
BEQ 
HLT 
SCOPE 



^SUBROUTINES 



CALBCC#Te«P3 

3$ 

27 



flS IT C0SPECT7 
jBP IF OK 



I SCOPE THIS TEST 



GETSIl 



NITCHI 



ITHIS SUBROUTINE READS hV 17, AND PUTS IT IMTQ NITCH- 
; MITCH IS ROTATED LEFT UNTILL THE SI BIT IS IN CARRY* 



BOMCLK 

021364 

MOV 

ROLB 

R0L5 

ROLB 

RTS 





»DMP04rNITCH 

NITCH 

NITCH 

NITCH 

PC 



INEXT WORD IS INSTRUCTION, POMCLK PC«5304 
jP0RT4«LU 17 
;5T0RE UU 17 



IPUT 51 IN THE CARRY BIT 



fTHIS SUBROUTINE SPINS ON OCOR 

*^°MCl*K jNEXT WORD 15 INSTRUCTION, ROHCLK PC«5304 

021364 |P0RT4.liU 17 

BIT #BIT4,9DMP04 j IS OCOR SET? 

BEQ QCQR yBR IF KG 

RTS PC J OK OCOP IS SET, GO BACK 



ITHIS SUBROUNTINE LOADS THE SILO WITH THE NUMBER OF SYNC 
I CHARACTERS PASSED TO IT IN THE WORD AFTER THE JSR CALL 
JAND A NON-SYNC CHARACTER (3013 



HOV 
ADD 
MOV 

ROMCLK 
122114 
JSR 
MOV 

ROHCLK 

122111 

MOV 

ROMCLK 

122U0 

DEC 

BNE 

JSR 

CLR 

ROMCLK 
122111 



@CSP}<f-f TEMPI 
#2,-£SP) 
l26f4fRi 1 



PCOUTRDY 
#1#4CR13 



«26,4(R1] 



TEMPI 
It 

PCOUTRDY 
4tRl} 



JGET COUNT 
» ADJUST STACK 
JLQAD PGRT4 

iNEXT WORD IS INSTRUCTION, ROMCLK PC«5304 
;LOAD SYNC REGISTER 
I WAIT FOR QUTRDY 
I LOAD P0RT4 

jNEXT WORD IS INSTRUCTION, ROMCLK PCa5304 

7 SET SOM 
fLOAD P0RT4 

;NEXT WORD IS INSTRUCTION. ROMCLK ?Ce5 304 

jLOAD OUT DATA 

J ALL DONE? 

^BR IF NOT 

(WAIT FOR OUTRDY 

jLOAD P0Rr4 

rNEXT WORD IS INSTRUCTION, ROMCLK PC«5304 

fSET SOM 
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SUBROUTINES 


4407 


026462 


012761 


000301 


000004 


05500 




440R 


026 470 


104414 










4409 


026472 


122110 






05700 




4410 


026474 


004737 


026350 




05800 




4411 


026500 


000207 






05900 




4412 










06000 




4413 










06100 




4414 


026502 








06200 


OUTRDYl 


4415 










06300 




4416 










06400 




4417 


026S02 


005037 


001256 




06500 




4418 


026506 








06600 


l«t 


4419 


026506 


104414 










4420 


026510 


021224 






06800 




4421 


026512 


032777 


000020 


152672 


06900 




4422 


026520 


001004 






07000 




4423 


026522 


005237 


001256 




07100 




4424 


026526 


001367 






07200 




4425 


026530 


104036 






07300 




4426 


026532 


000207 






07400 


211 


4427 










07500 




4428 










07600 




4429 


026534 








07700 


CHARI 


4430 










07800 




4431 










07900 




4432 










08000 




4433 


026534 


013637 


001250 




08100 




4434 


026540 


062746 


000002 




08200 




4435 


026544 


012737 


000003 


001246 


08300 




4436 


026552 


012761 


000026 


000004 


0S400 




4437 


026560 


104414 










4438 


026562 


122114 






08600 




4439 


026564 


004737 


026502 




0B700 


III 


4440 


026570 


0*2761 


000001 


0000Q4 


08800 




4441 


026^76 


104414 










4442 


026600 


122111 






09000 




4443 


026602 


012761 


000026 


000004 


09100 




4444 


02661O 


104414 










4445 


026612 


122110 






09300 




4446 


n^Sf, 1 4 












4447 


026620 


001361 






09500 




4448 


026622 


004737 


026502 




09600 




4449 


026626 


013761 


001250 


000004 


09700 




4450 


026634 


104414 










4451 


026636 


122110 






09900 




4452 


026640 


004737 


026350 




10000 




4453 


026644 


000207 






10100 




4454 










10200 




4455 










10300 




4456 


026646 








10400 


CKARSDl 


4457 










10500 


445B 










10600 




4459 


026646 


013637 


0012S0 




10700 




4460 


026652 


062746 


000002 




10800 




4461 


026656 


004737 


026502 




10900 




4462 


026662 


013761 


001250 


000004 


11000 





PAGEi 0102 



KOV 


ff3Ql,4(Rn 


ILOAO P0RT4 






ROMCLK 




fNEXT WORD IS INSTRUCTION, 


ROMCLK 


PCa5304 


122110 




;LOAD OUT DATA 






JSR 


PC, OCOR 


fWAIT FOR OCOR 






RTS 


PC 








;?HI5 5' 


USRCUTINE SPINS 


On CUT REAOX 






CLR 


TEMPS 


fCLEAR TIMER 






ROHCLK 




iNEXT WORD IS INSTRUCTION, 


ROHCLK 


PC«5304 


021224 




|P0RT4J<Ull 






BIT 


|BIT4f80HPQ4 


lis OUT RDY SETT 






BNE 


2t 


|BR IF YES 






INC 


TEMPS 


lINC TIMER 






BNE 


11 


fKEEP CHECKING IF NOT DONE 






HLT 


36 


} ERROR, OUT READY NOT SET 






RTS 


PC 







rTHIS SUBROUTINE LOADS THE SILO WITH 3 SYNCS 
fAND THE CHARACTER PASSED TO IT, 



MOV 
ADD 
MOV 
HOV 

ROMCLK 
122U4 
JSR 
MOV 

ROMCLK 
122U1 
MOV 

ROMCLK 

122U0 

Dec 

BNE 

JSR 

MOV 

ROMCLK 

122110 

JSR 

RTS 



»(8P)t,TEMP2 
l2fCSP) 
13, TEMPI 
«26,4{R1} 



PC* QUTRDY 
li»4(RU 



i26,4(Rl} 



TEMPI 
1$ 

PCfOUTRDY 
TEMP2,4tR13 



PC#OCOR 
PC 



fGET CHARACTER 
f ADJUST STACK 
jSET FOR 3 SYNCS 
fLOAD P0RT4 

fNEXT WORD IS INSTRUCTION, ROMCLK PC99304 
fLOAD SYNC REGISTER 
yWAIT FOR OUTRDY 
I LOAD P0RT4 

jNEXT WORD IS INSTRUCTION, ROMCLK PC>5304 
fSET SOM 
FLOAD P0RT4 

fNEXT WORD IS INSTRUCTION, ROMCLK PCb5304 

fLOAD OUT DATA 

fALL DONE? 

fBR IF NOT 

fWAIT FOR OUTRDY 

fLOAD P0RT4 

fNEXT WORD IS INSTRUCTION, ROMCLK PCaS304 
fLOAD OUT DATA 
fWAIT FOR OCOR 



fTKIS SUBROUTINE LOADS THE SILO WITH THE CHARACTER PASSED TO IT. 



HOV 
ADD 
JSR 
MOV 



•CSP}^,TEMP2 
•2,-(SP) 

PCOUTRDY 
7EMP2,4CRn 



fGGT CHARACTER 
f ADJUST STACK 
I WAIT FOR OUTRDY 
fLOAD P0RT4 
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PACiEl 0103 



4 46 3 


026670 


104414 














;N£XT WORD IS INSTRUCTION, 


ROMCLK 


446 4 


026 72 


J 22 1 1 






1 1200 




122110 




jLiOAD OUT DATA 




4 465 


096 7 4 


0047 37 


U ^ w 3 u A 




11300 




JSB 


PCfOUTPDY 


f*<AIT FDR OUTRDY 






0267 00 












ROMCLK 




jNEXT V^UPD IS INSTRUCTION, 


ROMCLK 


4 46 7 




122110 






11500 




122110 




|LOAD GARBAGE CHAP 






2 6 7 4 


Ou 47 37 


026350 




i 1600 




JSR 


PCOCOH 


^WAIT FOP OCOR 




4469 


0267 10 


W 1 1 u ^ u / 






1 1700 




BTS 


PC 






4470 










1 1800 






















11900 












447 2 


026712 








12000 


STLOliDi 










447 3 










121O0 




iTHIS SUBROUTINE FILLS 


THE OUT SILO 




447 4 










1 2200 




f WITH 


A BINARY COUNT 


PATTERN 




4475 










12300 












4476 


0267 1 2 


012737 


000073 


001250 


12400 




MOV 


#73» TEMP2 


ILOAD COUNT 




4477 


026720 


005737 


027 152 




12500 




TST 


SCHAR 


jFIRST TIME HERE? 




4478 


0267 24 


10047 






12600 






4t 


|BR IF BITSTUFF 




4479 


026726 


001032 






12700 




BNE 


29 


jBR IF NO 




448 


026730 


0627 37 


000002 


001250 


12800 




ADD 


#2* TEMP2 


} ADD 2 TO CHARACTER COUNT 




4481 


0267 36 


012737 


0O00O3 


001246 


12900 




MOV 


I3f TEMPI 


|SET FOR 3 SYNCS 




448? 


026744 


012761 


000026 


000004 


13000 




MOV 




iLOAD P0RT4 




446 3 


026752 


104414 










ROMCLK 




fNEXT WORD IS INSTRUCTIONf 


ROHCLK 


4484 


02675 4 


122114 






13200 




122114 




ILOAO SYNC REGISTER 




4485 


026756 


004737 


026502 




1 3300 


1$ 1 


JSR 


PC . QOTBDV 


yWAIT FOR OUTRDY 




4486 


026762 


012761 


00000 1 


000004 


13400 




MOV 


llr4CRl3 


fLOAD P0RT4 




4487 


026770 


104414 










ROMCLK 




(NEXT WORD IS INSTRUCTION, 


ROMCLK 


4488 


026772 


122111 






13600 




1 22 111 




{SET SOM 




4489 


02677 4 


012761 


000026 


000004 


13700 




MOV 




fLOAD P0RT4 




4490 


027002 


104414 










ROMCLK 




JNEXT WORD IS INSTRUCTlONr 


ROMCLK 


4491 


027004 


122110 






13900 




122110 




J LOAD OUT DATA 




4492 


027 006 


005337 


001 246 




14000 




DEC 


TEMPI 


|ALL DONE? 




4493 


027012 


00 1361 






14100 




BNE 


* » 


JBR IF NOT 




4494 


027014 


0047 37 


026502 




14200 


25 1 


JSR 




jXAIT FOR OUTRDY 




4495 


027 020 


OJ 3761 


027152 


000004 


14300 




MOV 




jLOAD P0RX4 




4496 


027 026 


1 044 1 4 










ROMCLK 




jNEXT WORD IS INSTRUCTION, 


ROMCLK 


4 497 


2 7 3 


122110 






14500 




122110 




iLOAD OUT DATA 




4498 


027032 


005737 


027 154 




14600 




TST 


STUFLG 


IBITSTUFFTT? 




4499 


027036 


001407 






14700 




BEQ 


68 


jBR IF NO 




4500 


027040 


013737 


027152 


027052 


14800 




MOV 




rIT IS SOLD SO CHECK BITSTUFFINU 


4501 


027046 


004537 


027702 




14900 




JSR 


R5»STFFCL 


jADD ANY BIT STUFF CLOCK TICKS 


4502 


027052 


000000 






15000 


SSI 







iCHARACTER 




45u3 


027054 


000010 






15100 




10 




jCHIFT COUNT 




4504 


027o56 


005237 


027152 




15200 


681 


INC 


SCHAR 


}NEXT CHARACTER 




4505 


027o62 


022737 


000400 


027152 


15300 




CMP 


ff400fSCHAR 


|ALL DONE? 




4506 


02707f^ 


001403 






15400 




BEQ 


3t 






4507 


027072 


00S337 


001250 




15500 




DEC 


TEMP2 


IDECREHENT COUNT 




4508 


027076 


001346 






15600 




BNE 


28 


fBR IF NOT DONE 




4509 


02 7 1 00 


004737 


026350 




15700 


311 


JSR 


PC#OCOR 


(WAIT FOR QCOR 




4510 


027104 


000207 






15800 




RTS 


PC 






4511 


027106 


005037 


027152 




15900 


411 


CLR 


SCHAR 


f START PATTERN AT ZERO 




4512 


0271 12 


012737 


177777 


027154 


16000 




MOV 


#- I, STUFLG 


;SET BITSTUFF FLAG 




4513 


027120 


005037 


030100 




16100 




CLR 


BITCON 


iCLEAR STUFF COUNT 




4514 


027124 


062737 


000002 


001250 


16200 




ADD 


I2#TEMP2 


fADD 2 TO CHARACTER COUNT 




4115 


027132 


012761 


000001 


000004 


16300 




MOV 


llf4CRl) 


|5ET BITO IN P0RT4 




4516 


027140 


104414 










ROHCLK 




J NEXT WORD IS INSTRUCTION, 


ROMCLK 


4517 


0271 42 


122U1 






16500 




122111 




{SET SOMl 




4518 


027144 


104414 










ROMCLK 




I NEXT WORD IS INSTRUCTION, 


ROMCLK 
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OZDME.Pll 
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PAGE* 0104 



4519 


027146 


122110 






16700 


4520 


027150 


000721 






16800 


4521 


027152 


000000 






16900 


4522 


027154 


000000 






17000 


4523 










"17100 


4524 










17200 


4525 


027156 








17300 


4526 










17400 


4527 










17500 


4528 










17600 


4529 










17700 


4530 










17800 


4531 










17900 


4532 










18000 


4533 


027156 


012737 


000000 


001246 


18100 












18200 


4535 


027164 


104414 








4536 


027166 


021244 






18400 


4537 


077170 


032777 


000020 


152214 


18500 


4538 


027176 


001004 






18600 


4539 


027200 


005237 


001246 




16700 


4540 


027204 


001367 






18800 


4541 


027206 


104037 






18900 


4542 


027210 


000207 






19000 


4543 










19100 


4544 










19300 


4545 


027212 










4546 












4547 












4548 












4549 












4550 


027212 


010046 








4551 


027214 


012537 


001246 






4552 


027220 


012537 


001250 






4553 


027224 


012537 


027320 






4554 


027230 


013700 


027320 






4555 


027234 


000241 








4556 


027236 


006037 


027320 






4557 


027242 


006037 


001250 






4558 


027246 


005500 








4559 


027250 


006000 








4560 


027252 


103011 








4561 


027254 


013700 


037316 






4562 


027260 


043700 


027320 






4563 


027264 


043737 


027316 


027330 




4564 


027272 


050037 


027320 






4565 


027276 


005337 


001246 






4566 


027302 


001352 








4567 


027304 


013700 


027320 






4568 


027310 


006000 








4569 


027312 


012600 








4570 


027314 


000205 








4571 


027316 


000000 








4572 


027320 


000000 








4573 




000200 








4574 




1 200P1 









122110 
BR 

SCHARl 
STUFLGl 



28 



fLOAD GARBAGE CHAR 
;GU LOAD SILO 



INRDYI 



fTHIS SUBROUTINE SPINS ON INRDY 

piF XNRDY FAILS TO SET THE DELAY TIMES OUT AND AN 
I ERROR IS REPORTED, FOR BETTER SCOPE LOOPS THIS 
fDELAY CAN BE MADE SHORTER BY ALTERING THE NUMBER 
f INITIALLY LOADED INTO TEMPI, THE SMALLER THE NUMBER 
I THE SHORTER THE DELAY, IS THE LONGEST DELAY, 



281 



SIMBCCt 



MOV 


10, TEMPI 


|5ET UP DELAY COUNTER 


RuMCi^K 




p-'EXT ^?F.!; IS IvftTPUfTtON 


031344 




IPORT4.LU12 


BIT 


|BIT4,»DMP04 


lis INRDY SETT 


BNE 


38 


|BR JF YES 


INC 


TEMPI 


|INC DELAY 


BNE 


18 


yTRY AGAIN 


HLT 


17 


I ERROR, NO INRDY 


RTS 


PC 


^RETURN 



ROMCLK PC-5304 



(THIS SUBROUTINE CALCULATES THE CRC USING POLYNOMIAL GIVEN 
fiN XPOLY, THE CORRECT CRC IS RETURNED IN CALBCC, AND~THE 
I STATE OF THE LSB OF THE BCC IS RETURNED IN THE C BIT, 



281 



XPOLYl 
CALBCCi 
LRC8B200 

CRC16«120001 



NOV 


RO#-(SPJ 


fSAVfi RO ON STACK 


HOV 


(R5)*»TEMP1 


iTEMPl ■ SHIFT COUNT 


MOV 


(R5)*,TEMP2 


fTEMP2 ■ CHARACTER 


MOV 


CRSJ-t-fCALBCC 


1 CALBCC ■ OLD BCC 


MOV 


CALBCCRO 


)PUT OLD BCC IN RO 


CLC 






ROR 


CALBCC 


} SHIFT OLD BCC 


ROR 


TEMP2 


) SHIFT CHARACTER 


ADC 


RO 


|ADD CHAR CARRY TO OLD BCC 


ROR 


RO 


iPUT BITO TO CARRY BIT 


BCC 


38 


(CARRY IS FEEDBACK BIT 


MOV 


XPOLY, RO 


|IF FEEDBACK ■ 1 


BIC 


CALBCCRO 


lEXCLUSIVLY OR XPOLY TO CALBCC 


BIC 


XPOLY, CALBCC 




BIS 


RO, CALBCC 




DEC 


TEMPI 


|DEC SHIFT COUNT 


BNE 


18 


|BR IF NOT DONE 


MOV 


CALBCC, RO 


I PUT RESULT IN RO 


ROR 


RO 


ISHIFT BITO TO CARRY 


MOV 


tSPJ+iRQ 


J RESTORE RO 


RTS 





R5 


1 RETURN 
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457S 




102010 








4576 












4577 












4578 


027322 








19800 


4579 








19900 


4580 










20000 


45S 1 










20100 


45 g 2 










20200 


4563 


027 322 


01363? 


001250 




20300 


4584 


027 326 


062746 


000002 




20400 


4585 


027 332 


05 2737 


OQ0002 


001246 


20500 


45S6 


027 340 


012761 


000026 


000004 


20600 


4597 


027346 


104414 








4588 


027350 


122114 






20800 


4584 


027352 


004737 


026502 




20900 


4590 


027356 


012761 


000001 


000004 


21000 


4591 


027 36 4 


104414 








4592 


027366 


122111 






21200 


4593 


027370 


012761 


000026 


000004 


21300 


4594 


027376 


104414 








4595 


027400 


122110 






21500 


4596 


027402 


005337 


001246 




21600 


4597 


027406 


001361 






21700 


4598 


027410 


004737 


026502 




2ieoo 


4599 


027414 


OS 3761 


001250 


ooooa4 


21900 


4600 


037422 


1 04414 








460 1 


027 424 


122110 






22100 


4602 


027426 


004737 


026350 




22200 


d§() 3 


027432 


000207 






22300 


4604 










22400 


4605 










22500 


4606 


027434 










4607 












4606 












4609 












4610 


027434 


104414 








461 1 


027436 


021364 








46 1 2 


027440 


106177 


151746 






461 3 


027444 


000207 








4614 












4615 












4616 


027446 










461 7 












4618 












4619 












4620 


027446 


104414 








4621 


027450 


021364 








4622 


027452 


J 06177 


151734 






4623 


027456 


ICfel?? 


15173Q 






4624 


027462 


000207 








4625 












4626 












4627 


027464 








22B00 


4628 










22900 


4629 










23000 


4630 










23100 



CRC.CCI7TalO2Ol0 



JTHIS SUBROUTINE LOADS THE OUT SILO WITH 2 5YNCS 
JWITH SOM SET, AND OiJE CHARACTER PASSED TO IT 
|¥JITK THE SOH SIT CLEAR CiNABLE CRCl 



MOV 
ADD 
MOV 

MOV 

ROMCLK 
122114 
J5R 
MOV 

RQMCLK 
122111 

MOV 

ROMCLK 

122110 

DEC 

BNE 

JSR 

MOV 

ROMCLK 
122110 
JSR 
PTS 



SYNLDI 



&(SP)+,TEMP2 

t2p-CSP) 

#2»TEMP1 



PCOUTRDIC 
*lf4CRl) 



i26»4(Rl} 



TEMPI 
U 

PCOUTRDY 
TCMP2f 4CR1) 



PCOCOR 
PC 



»GET CHARACTER 
J ADJUST STACK 
;SET FOR 2 SYNCS 
I LOAD P0RT4 

J NEXT WORD IS INSTRUCTION, ROMCLK PC»5304 
JLOAD S1£NC REGISTER 
I WAIT FOR OUTRDY 
fLOAD P0RT4 

rNEXT WORD IS INSTRUCTION, ROMCLK PC«5304 
J SET SOM 
J LOAD P0RT4 

»N£XT WORD IS INSTRUCTION, ROMCLK PC«5304 

fLOAD OUT DATA 

fALL DONE? 

|BR IF NOT 

fWAIT FOR OUTRDY 

fLOAD PQRT4 

fNEXT WORD IS INSTRUCTION, ROMCLK PCs5304 
I LOAD OUT DATA 
fHAIT FOR OCOP 



I THIS SUBROUTINE READS THE STATE OF THE TRANSMIT 
fBCC LSB AND PUTS IT IN THE CARRY BIT 



ROMCLK 
021364 

ROLB 9DHP04 
RTS PC 



jNEXT WORD IS INSTRUCTION, ROMCLK PC«5304 
|PORT4»LU-17 
{PUT QO IN CARRY 
f RETURN 



tTHlS SUBROUTINE READS THE STATE OF THE RECEIVE 
|6CC LSB AND PUTS IT IN THE CARRY BIT 



021364 

ROLB 
ROLB 



9DHP04 
9DMP04 



PC 



fNEXI WORD IS INSTRUCTION, ROMCLK PCb5304 

|PORT4.LU-i7 

I PUT QO IN CARRY 

J PUT QI IN CARRY 

J RETURN 



ffHXS SUBROUTINE LOADS OUT SILO »ITH 
1 2 SYNC CHARACTERS WITH SOM SET 
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SUBROl 


4631 


027464 


012737 


000002 


001246 


23200 


4632 


027472 


012761 


000026 


000004 


23300 


4633 


027500 


104414 








4634 


027502 


122114 






23500 


4635 


027504 


004737 


026502 




23600 


4636 


0275IO 


012761 


000001 


000004 


23700 


4637 


027516 


104414 








4638 


027520 


122111 






23900 


4639 


0275^2 


012761 


000026 


000004 


24000 


4640 


027530 


104414 








4641 


027532 


122110 






24200 


4642 


027534 


005337 


001246 




24300 


4643 


027540 


001361 






24400 


4644 


027542 


000207 






24500 


4645 










24600 


4646 










24700 


4647 


027544 








24600 


4648 










24900 


4649 










25000 


4650 










25100 


4651 


027544 


004737 


026502 




25200 


4652 


027550 


012761 


OQOOQl 


000004 


25300 


4653 


027556 


104414 








4654 


027560 


122111 






25500 


4655 


027562 


QOS06I 


000004 




25600 


4656 


027566 


104414 








4657 


027570 


122110 






25800 


4658 


027572 


000207 






25900 


4659 










26000 


4660 










26100 


466! 


027574 








26200 


4662 










26300 


4663 










26400 


4664 










26500 


4665 


027574 


004737 


026502 




26600 


4666 


027600 


012761 


000002 


000004 


26700 


4667 


027606 


104414 








4668 


027610 


IZZlll 






26yGG 


4669 


027612 


104414 








4670 


027614 


122110 






27100 


4671 


027616 


000207 






27200 


4672 










27300 


4673 










27400 


4674 


027620 








27500 


4675 










27600 


4676 










27700 


4677 










27800 


4678 










27900 


4679 


027620 


010046 






280QQ 


4680 


027622 


012500 






28100 


4681 


027624 


012537 


001246 




28200 


4682 


027630 


Q04737 


026502 




26300 


46B3 


027634 


112061 


000004 




2B400 


4684 


027640 


104414 








4685 


027642 


122110 






28600 


4686 


ft27644 


005337 


001246 




28700 



PAGEt 0106 



SOMt 



EOHf 



lit 



MOV 


#2, TEMPI 


ILOAD COUNTER FOR 2 SYNCS 


MOV 


#26,4(R1} 


fP0RT4,26 


ROMCLK 




fNEXT WORD IS INSTRUCTION, ROMCLK 


122114 




fLOAD SYNC REG 


JSR 


PC, OUTRDY 


fWAIT FOR OUTRDY 


MOV 


*lf 4CR1} 


}LOAD P0RT4 


RCnCLK 




;NEXT Woon tr tnsti^uCTION; ROmCLK 


1221U 




fSEt SOM 


MOV 


•26,4CR1) 


fP0RT«26 


ROMCLK 




JNEXT'WORD IS INSTRUCTION, ROMCLK 


122U0 




fLOAD OUT DATA WITH SYNC 


DEC 


TEMPI 


fOECREMENT COUNTER 


BNE 


It 


fBR IF NOT DONE 


RT8 


PC 


f RETURN 



fTHIS SUBROUTINE LOADS SOM AND OUT DATA WITH A 
fGARBAGE CHARACTER (0) 



JSR 

MOV 

ROMCLK 

123111 

CLP 

ROMCLK 

122110 

RTS 



PC, OUTRDY 
flr4(Rl) 



4(R1) 



PC 



fWAIT FOR OUTRDY 
fP0RT4,l 

fNEXf WORD IS INSTRUCTION, 
I SET SOM 

ICLEAR DATA CHAR 
fNEXT WORD IS INSTRUCTION, 
I LOAD GARBAGE CHARACTER 
I RETURN 



ROMCLK PC«33G4 



ROMCLK PCaS304 



fTHIS SUBROUTINE LOADS EOH AND OUT DATA WITH A 

IGARBAGE CHARACTER (2) TO ENABLE TRANSMISSION OF BCC 

JSR PC, OUTRDY I WAIT FOR OUTRDY 

MOV •2,4CRn fPORT4«2 

ROMCLK fNEXT WORD IS INSTRUCTION, ROMCLK PC«S3Q4 

ROMCLK fNEXT WORD IS INSTRUCTION, ROMCLK PCb5304 

122110 fLOAD GARBAGE CHARACTER 

RTS PC f RETURN 



fTHIS SUBROUTINE LOADS SILO WITH MESSAGE 

fTHE FIRST ARUGUMENT IS THE ADDRESS OF THE MESSAGE 

I THE SECOND ARGUMENT IS THE NUMBER OF CHARACTERS IN THE MESSAGE 



MOV 


R0,-C8P5 


iSAVE RO 


MOV 


CR5)f,R0 


fROsMESSAGE POINTER 


MOV 


CRB)+, TEMPI 


1 TEMPI "CHARACTER COUNT 


JSR 


PC, OUTRDY 


fWAlT FOR OUT RDY 


MOVB 


CR0}t,4fRn 


fLOAD P0RT4 WITH CHARACTER 


ROMCLK 




fNEXT WORD IS INSTRUCTION, ROMCLK PCbS304 


122110 




fLOAD OUT DATA SILO 


DEC 


TfMPl 


fDEC CHAR COUNT 
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4687 


027650 


001 3t«7 






28B00 




BN£ 


1$ 


>RR IF NOT DUNK 




027652 


004737 


026350 




28900 




JSR 


PCfOCOP 


jWAIT FOP OCOR 


4689 


027656 


01 2600 






29000 




MOV 


CSP)*»RO 


J RESTORE PO 


4690 


027660 


000205 






29100 




PT5 


R5 


jPETURN 


4691 










29200 










4692 










29300 










4693 


027662 








29400 


CLPIOl 








4694 










29500 




ITHIS SUBROUTINE SETS IN CLR AND OUT CLP TO 


4695 










29600 




;CLEAR 


THE TRANShill AND 


RECEIVE BCC REGISTERS 


4696 










29700 










4697 


027662 


012761 


000200 


000004 


29B00 




MOV 


»BIT7,4(Rl) 


ILOAD P0RT4 


4698 


027670 


104414 










ROMCLK 




fNEXT WORD IS iNSTHUCTIONr RUMCLK PCs5304 


4699 


027672 


122112 






30000 




122112 




ISET IN CLRl 


4700 


027674 


104414 










ROMCLK 




|NEXT WORD IS INSTRUCTION, ROMCLK PC«5304 


4701 


027676 


1221 11 






30200 




122111 




jSET OUT CLRl 


4702 


027700 


000207 






30300 




RTS 


PC 


J RETURN 


4703 










30400 








4704 










30500 










4705 


027702 








30600 


STFFCLl 








4706 










30700 




ITKIS SUBROUTINE ADOS ANY NECESSSARY BIT STUFF CLOCK TICKS 


4707 










30800 




jFIRST 


ARGUMENT IS CHAR, 


SECOND ARGUMENT IS SHIFT COUNT, 


4708 










30900 








4709 


027702 


010046 






31000 




MOV 


RO,-CSP} 


fSAVE RO 


4710 


02770 1 


012500 






31100 




MOV 


CR5)+»R0 


IPUT CHAR IN RO 


47 1 1 


027706 


012537 


001252 




31200 




MOV 


(R5)+,TEMP3 


»PUT SHIFT COUNT IN TEMP3 


47 1 2 


027712 


1 06000 






31300 


1 $ 1 


RORB 


RO 


»LOOK AT NEXT BIT 


4713 


0277 1 4 


103403 






31400 




BCS 


2t 


}BR IF A MARK 


47 14 


027716 


005037 


030100 




31500 




CLR 


BITCON 


|IT WAS A SPACE, CLEAR I'S COUNTER 


4715 


027722 


00041 2 






31600 




BR 


38 


^CONTINUE 


4716 


027724 


005237 


030100 




31700 


2tt 


INC 


BITCON 


lINC CONSECUTIVE I'S COUNTER 


4717 


027730 


022737 


000005 


030100 


31B0O 




CMP 


#5#BITC0N 


lis IT 5 YET? 


4718 


0277 36 


001004 






31900 




BNE 


38 


IBR IF NO 


4719 


0?7740 


005037 


030100 




32000 




CLR 


BITCON 


;YESi SO START AGAIN 


4720 


027744 


104415 


ooopol 




32100 




DATACLK 


$ 1 


jGIVE EXTRA TICK TO STUFF ZERO 


47 21 


037750 


005337 


001252 




32200 


3St 


DEC 


TEMP3 


|DEC SHIFT COUNT 


4722 


037754 


001356 






32300 




BNE 


18 


|BR IF NOT DONE 


4723 


027756 


012600 






32400 




MOV 


CSP)+,RO 


r RESTORE RO 


4724 


027760 


000205 






32500 




RTS 


R5 


} RETURN 


4725 










33600 










4726 










32700 










4727 


027762 








32600 


STFFCKt 








4728 










32900 




I THIS SUBROUTINE CHECKS 


TO SEE IF TRANSMITTER 


4729 










33000 




|I5 STUFFING ZEROS WHEN 


IT SHOULD, FIRST ARGUMENT 


4730 










33100 




fiS THE 


CHARACTER, SECOND ARGUMENT IS SHIFT COUNT. 


47 31 










33200 










4732 


027762 


010046 






33300 




MOV 


ROr-CSP) 


ISAVE RO 



4733 


027764 


012500 




33400 




MOV 


(R5)+»R0 


yPUT CHAR IN RO 


4734 


027766 


012537 


001252 


33500 




MOV 


(R5}+,TEMP3 


|PUT SHIFT COUNT IN TEMP3 


4735 


027772 


1 06000 




33600 


181 


RORB 


RO 


I SHIFT OUT NEXT BIT 


4736 


027774 


103403 




33700 




BCS 


28 


|BR IF IT IS A MARK 


4737 


027776 


00-5037 


030100 


33800 




CLR 


BITCON 


}IT WAS A SPACE, CLEAR I'S COUNTER 


4738 


030002 


000416 




33900 




BR 


38 


iCONTINUE 


47 39 


030004 


005237 


030100 


34000 


28t 


INC 


BITCON 


|INC CONSECUTIVE I'S COUNTER 


4740 


030010 


022737 


000005 


030100 34100 




CMP 


#5, BITCON 


f5 IN A ROW YET? 


4741 


03001b 


001010 




34200 




BNE 


38 


■jBR IF NO 


4742 


030020 


005037 


030100 


34300 




CLP 


BITCON 


;YES, 50 START OVER 
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4743 


030024 


104415 


000001 




34400 




DATACLKi 


, i 1 EXTRA TICK TO STUFF ZERO 


4744 


030030 


004737 


026316 




34500 




JSR 


PCGETSI iLOOK AT WINDOW 


4745 


030034 


103001 




34600 




BCC 


38 lis IT A ZERO, BR IF YES 


4746 


030036 


104030 






34700 




HLT 


30 fNO, ERROR ZERO WAS NOT STUFFED 


4747 


030040 


005337 


001252 




34800 


381 


DEC 


TEHP3 |DEC SHIFT COUNT 


4748 


030044 


001352 






34900 




BNE 


18 |BR IF NOT DONE 


4749 


030046 


012600 






35000 




MOV 


(SP)<f,RO 1 RESTORE RO 


4750 


030050 


000205 






39100 




RTS 


R5 f RETURN 


4751 










35200 








4752 










35300 








4753 


030052 








35400 


CTSOLYl 






47S4 










35500 




ITHIS SUBROUTINE WASTES TIME UNTIL CTS SETS* 


4755 










35600 




IBUT HOPEFULLY NOT SO LONG THAT THE SILO RUI^S OUT 


4756 










35700 








4757 


030052 


010046 






35800 




MOV 


R0,-(5P} tSAVE RO 
















MOV 


•3?#R0 iLOAD RO WITH COUNT 


4759 


030060 


027777 


151120 


151116 


36000 


181 


CMP 


»TKCSR,»TKC8R fWASTE TIME 


4760 


030066 


005300 






36100 




DEC 


RO 1 DECREMENT COUNTER 


4761 


030070 


001373 






36200 




BNE 


18 }P0 XT AGAIN IF NOT n 


4762 


030072 


012600 






36300 




MOV 


(8P)««R0 1 RESTORE RO 


4763 


030074 


000207 






36400 




RTS 


PC y RETURN 


4764 










36500 






4765 










36600 








4766 


030076 


000176 






36700 


FLAG I 


*B<01inil0> iFLAG CHARACTER 


4767 


030100 


000000 






36800 


BITCON 1 







4768 


030102 


000 


125 


252 


36900 


MESDATi 


.BYTE 


0,125,252,377 


4769 


030105 


377 














4770 


030106 


001 


002 


004 


37000 


FLTDATi 


.BYTE 


if3f 4, 10,20, 40f 100, 200, 376, 379 f 373 #367 f 357 r 337,; 


4771 


030111 


010 


020 


040 










4772 


030114 


100 


200 


376 










4773 


0301 17 


375 


373 


367 










4774 


030122 


357 


337 


277 










4775 


030125 


177 














4776 


030126 


100 


140 


160 


37100 


STUFDTi 


.BYTE 


100*140, 160, 170, 3# 300, 174, 176, 177 rl 


4777 


030131 


170 


003 


300 








4778 


030134 


174 


176 


177 










4779 


030137 


001 














4780 


030140 


363 


347 


317 


37200 




.BYTE 


363* 347, 317, 200f Or 377, 377 r 377, 200*37 


4781 


030143 


200 


000 


377 










4782 


030146 


377 


377 


200 










4783 


030151 


037 














4784 










37300 


.EVEN 






4785 


030152 


046377 


047111 


020109 


00300 


EMlt 


.ASCZZ 


<377>/LlNE UNIT INITALIZATION TEST/ 




030210 


046377 


047111 


020109 


00400 


EM2t 


•ASCIZ 


<377>"LINE UNIT REGISTER READ/ONLY TEST" 




030253 


377 


044514 


042516 


00500 


EM3t 


,ASCIZ 


<377>*LINE UNIT REGISTER WRITE/READ TESi" 




030317 


377 


044514 


042516 


00600 


EM4I 


.ASCIZ 


<377>/LINE UNIT INTERNAL CLOCK FAILURE/ 




030361 


377 


051124 


047101 


00700 


EMSt 


.ASCIZ 


<377>/TRANSMITTEB DATA ERROR/ 




030411 


377 


042522 


042503 


00800 


EM6t 


.ASCIZ 


<377>/RECEIVER TEST/ 




030430 


051377 


041505 


044509 


00900 


EM7I 


•ASCIZ 


<377>/RECEIVER DATA ERROR/ 




030455 


377 


047515 


042504 


01000 


EMIOI 


.ASCIZ 


<377>/MODEM SIGNAL ERROR/ 




030501 


377 


051124 


04710J 


01100 


EMllI 


.ASCIZ 


<37?>/TRANSMITTER CRC ERROR/ 




030530 


051377 


041S05 


044505 


01200 


EM12I 


.ASCIZ 


<377>/RECElVER CRC ERROR/ 




030554 


044777 


020116 


041502 


01300 


EM13I 


.ASCIZ 


<377>/IN BCC MATCH ERROR (LU REG 12)/ 




O30614 


052377 


040522 


051516 


01400 


EM14I 


.ASCIZ 


<377>/TRANSMlTTEB FAILED TO GO TO HARK STATE/ 




030664 


041777 


041101 


042514 


01500 


EM15I 


.ASCIZ 


<377>/CABLE DATA TEST/ 




030705 


377 


046106 


043501 


01600 


E¥16l 


.ASCIZ 


<3?7>/FtAG ERROR/ 



I 
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030721 






047 1 1 






ASCIZ 




TU OlUrr A iiCiKU/ 




377 


05 3S23 


0521 1 t 


1 800 




ASCIZ 


<377>/SWITCH PAC TKST/ 




3 1 U n 




047 502 


052122 


01900 


£^2 1 1 


( ASCZZ 


<377>/ABORT ERROR/ 






377 


05 1 1 24 


047101 




EM22 1 


A5CIZ 


<377>/TPANS'^ITTEH ERROR/ 








046101 


0201 06 


02100 


£ 2 3 1 


, ASCI2 


<377>/HALF DUPLEX TE;ST/ 






047777 


052125 


OS 1 o4o 


02200 


E M 2 4 t 


» ASCIZ 


<377>/OUT RKADY NOT SET/ 




031113 


577 


047111 


05 1 04G 


02300 


EH25 1 


•ASCIZ 


<377>/IN READY NQT SET/ 






















377 




042520 


02S00 


DHl t 


c ASCIZ 


<377>/EXPECTED FOUND/ 








0501 30 


041505 


02600 


DH2 1 


ASCIZ 


<377>/EXPECTED FOUND LL 


-REGISTER/ 


031214 


041777 


040510 


040522 


02700 


DH3 1 


.ASCIZ 


<377>/CHARACTER BIT THAT FAILED/ 


31^52 


M41 777 


05111? 


042522 


■ 02800 


DH4 ! 


. ASCIZ 








042777 


050130 


041505 


02900 


0H5 I 


•ASCIZ 






031 ^44 


42777 


050130 


041505 


03000 


DH6 1 


.ASCIZ 




CnAKAv.TC<K BnlrT/ 


031412 


041377 


047514 


045503 


03100 


0H7 1 


» ASCIZ 


<3773>/BLOCK END HOT SET/ 




03 1 435 


377 


052122 


020123 


03200 


0H1OI 


, ASCIZ 


^^77>/RTS DTD ^OT CX.FtU/ 












03300 


,CVEN 
















03400 










031 460 


000002 






03500 


DTI I 


2 






03I462 


003 


007 




03600 






3 1 7 




031464 


00 1 272 






03700 




SAVR5 






03 1 466 


003 


002 




03600 




.BYTE 


3# 2 




031470 


001 270 






03900 




SAVR4 






031 472 


000003 






04000 


DT2l 


3 






031474 


003 


007 




04100 




.BYTE 


1.7 




031 476 


001272 






04200 




SAVR5 






31500 


003 


010 




04300 




tBYTE 


3«10 




03 1 502 


001270 






04400 . 




SAVR4 






03I5O4 


003 


002 




04500 




.BYTE 


3f 2 




03 1 5O6 


001 264 






04600 




SAVR2 








000002 






04700 


DT3t 


2 






03I5I2 


003 


017 




04800 




(BYTE 


3# 17 




031514 


00 1272 






04900 




SAVR5 






3 1 5 1 6 


002 


002 




05000 




(BYTE 


2*2 






u u 1 « D u 






05 100 




SAVR3 






031522 


\J\JK/UKf £ 






Q5200 


DT4 1 


2 






031524 


006 


031 




05300 




.BYTE 


6«21 




031526 


027320 






05400 




CALBCC 








002 


002 




05500 




.BYTE 


2*2 




031532 


nni 7 ft A 






0560O 




SAVR3 






031534 


000003 






05700 


DT5 1 


3 










Oil 




05800 




.BYTE 


I f 11 




03 1 540 


001300 






05900 




ZERO 






031542 


00 1 


Oil 




06000 




.BYTE 


lilt 




03 1544 


001302 






06100 




ONE 






03 1546 


002 


002 




06200 




.BYTE 


2,2 




O3I55O 


001260 






06300 




SAVRO 






031S52 


000003 






06400 


DT61 


3 






031554 


001 


Oil 




06500 




.BYTE 


If 11 




031556 


001302 






06600 




ONE 






031560 


001 


Oil 




06700 




.BYTE 


If. 11 




3 1 562 








06600 




ZERO 






031564 


002 


002 




06900 




.BYTE 


3#2 




031566 


001260 






07000 




SAVRO 






031570 


000004 






07100 


DTTI 


4 






031572 


001 


Oil 




07200 




.BYTE 


If 11 
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03 1 5 7 4 
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07300 




ZERO 






031576 


001 


Oil 




07400 




■ BYTE 


I * 11 






001302 






07500 




ONE 






031602 


003 


007 




•07600 




.BYTE 


3f7 




031604 


00 127 2 






07700 




SAVR5 






031606 


002 


001 




07800 




.BYTE 


2» I 




031610 


nn 1 Ofift 

W 1 4 W D 






07900 




SAVR3 






Ollfil 2 


000004 






08000 


DTl&t 


4 






31614 


001 


Oil 




08100 




(BYTE 


If 11 




031616 


001302 






08200 




ONE 






03 1620 


001 


Oil 




08300 




.BYTE 


if 11 




03 1622 


001 too 






08400 




ZERO 






031624 




_ 

07 




08500 




.BYTE 


3f 7 




031626 


001272 






08600 




SAVR5 






031630 


002 


001 




08700 




.Byte 


2f 1 




316 32 


001 96& 






08800 




SAVR3 






031634 


00000 2 






08900 


DTllI 


2 






031636 


003 


007 




09000 




.BYTE 


J# 7 




03 1 640 


030076 






09100 




FLAG 






031642 


002 


002 




09200 




.BYTE 


2f2 




03 1644 


001 266 






09300 




SAVR3 






03 1646 


000002 






09400 


DT12I 


2 






031650 


006 


004 




09500 




.BYTE 


6f 4 




03 j 652 


027320 






09600 




CALBCC 






031654 


006 


002 




09700 




.BYTE 


Of 2 




031656 


001252 






09800 




TEMP3 














09900 










031660 








10000 


.EHRTABt 






031660 


000000 






10100 











031 662 


Aft n A A A 






10200 











031664 


000000 






10300 











031666 


030152 






10400 


EMI 








031670 


031156 






10500 


DH2 


|HLT 


I 




031672 


031472 






10600 


DT2 






031674 


0302 1 






10700 


EM2 








031676 


03 1 1 56 






10600 


DH2 


|HLT 


2 




03 1 700 


031472 






10900 


DT2 








031 702 


030253 






11000 


EM3 










G3 1 15s 
















03I7O6 


031472 






U2o6 


0T2 








03I7IO 


030317 






11300 


CM 4 








03 I7 1 2 


U W V UU V 






11400 





»HLT 


4 




03I7I 4 


U V U W V V 






11500 











03I7I6 


030361 






11600 


EMS 








031720 


031 156 






11700 


DH2 


IHLT 


9 




03 1 7 22 








11800 


DT2 








031724 


030361 






11900 


EMS 








031726 


031214 






12000 


DH3 


IHIT 


6 




031730 


031510 






12100 


DT3 








031732 


030411 






12200 


CM6 








031734 


031135 






12300 


DHl 


IHLT 


7 




031736 


031460 






12400 


OTl 






031740 


030430 






12500 


EM7 








031742 


031135 






12600 


DHl 


IHLT 


10 




031744 


Q31460 






12700 


DTI 




031746 


030455 






12800 


EMIO 
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031750 


031 135 


12900 


DHl 


t HLT 


1 1 


031752 


03 1460 


13000 


DTI 






031754 


030501 


13100 


EMI 1 






03l7b6 


31312 


13200 


DH5 


|HLT 


1 2 


0117 6 


U31534 


1 3300 


DTS 






031762 


030530 


13400 


EMI 2 






031764 


031312 


I 3500 


DH5 


I HLT 


1 3 


3 17^6 


031534 


1 3600 


DTS 






031770 


030501 


13700 


EMU 






031772 


031252 


13600 


DH4 


|HLT 


14 


031774 


031S22 


13900 


DT4 






031776 


030554 


14000 


EMI 3 






032000 


000000 


14100 





t HLT 


15 


032002 


000000 


1 4200 









032004 


030501 


1 4300 


EMU 






032O06 


031312 


14400 


DH5 


1 HLT 


16 


032010 


031552 


14500 


DT6 






037012 


030530 


14600 


EM12 






032014 


031312 


1 4700 


DH5 


1 HLT 


1 7 


032016 


031552 


14800 


DT6 






032020 


030501 


1 4900 


E^*l 1 






032022 


031344 


15000 


DH6 


|HLT 


20 


032024 


031570 


15100 


DT7 






032026 


O30501 


15200 


E?*l I 






032030 


031344 


15300 


DH6 


|HLT 


21 


032032 


031612 


15400 


DTI 






032034 


030530 


15S00 


EM12 






032036 


031344 


15600 


DH6 


»HLT 


22 


032o40 


031570 


15700 


DT7 






032042 


G30530 


15800 


EMt2 






032044 


031 344 


15900 


DH6 


|HLT 


23 


032046 


031612 


16000 


DTIO 






032050 


030614 


16100 


EM 14 






032052 


000000 


16200 





|HLT 


24 


032054 


000000 


16300 









032056 


030664 


16400 


EM15 






032060 


031135 


16500 


DKl 


|HLT 


25 


032062 


031460 


16600 


DTI 






032064 


030705 


16700 


EM16 






032066 


031214 


16800 


DH3 


|HLT 


26 


032070 


031634 


16900 


HTll 






032072 


030530 


17000 


EMI 2 






032074 


031 135 


17100 


DHl 


|HLT 


27 


032o76 


031546 


17200 


DT12 






032100 


030721 


17300 


EH17 






032102 


000000 


17400 





|HLT 


30 


032104 


000000 


17500 









032106 


030765 


17600 


EM20 






0321 10 


031135 


17700 


DHl 


f HLT 


31 


032112 


U31460 


17800 


DTI 






032114 


031006 


17900 


EM21 






0321 16 


031412 


18000 


DH7 


|HLT 


32 


032120 


000000 


18100 









03212? 


031006 


18200 


EM21 






012124 


031214 


18300 


DH3 


»HLT 


33 


032126 


031510 


18400 


DTS 
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032130 


U31023 


18500 


EM22 


032132 


031435 


16600 


DHIO 


032134 


000000 


18700 





032136 


031046 


18800 


EM23 


032140 


031156 


'18900 


DH2 


032142 


031472 


19000 


DT2 


032144 


031070 


19100 


EM24 


032146 


000000 


19200 





032150 


000000 


19300 





032152 


031113 


19400 


EM25 


032154 


000000 


19500 





032156 


000000 


19600 





032160 


030411 


19700 


EM6 


032162 


031156 


19800 


DH2 


032164 


031472 


19900 


DT2 






20000 


EM? 


032170 


031312 


20100 


DH5 


032172 


031534 


20200 


DTS 


032174 


030554 


20300 


EM13 


032176 


031135 


20400 


DHl 


032200 


031460 


20500 


DTI 






20600 








20700 




032202 




20800 


GORM 




000001 


21300 
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»HLT 



(HLT 



»HLT 



(HLT 
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AP RC N Tx 


004373 


B79* 


915* 


9241 


659* 




AUOONE 


0u3024 


569 


608 


613 




AUSTRT 


U02446 


5&S i 


663 








AUTC t S 




526 


1 368* 








BCCLD 


027322 


2987 


3016 


3062 


3091 


313? 


B I Nl^RD 


4 7 1 4 


965* 


966* 


- 969 


1006* 






n 3 4 n ft 

y J u 1 V '» 


4513* 


47 14* 


4716* 


4717 


4719* 




OOCOO 1 


951 


1155 


U56 






RTT1 S 


OOOOO2 


941 


531 


U49 


1155 


1156 


B I T 1 * 


OO2oO0 


851 


1513 


1524 




2188 


B IT 1 1 * 


qq4q00 


84« 


2053 


2086 


2130 


3565 


2613 


2650 


2687 


2724 






3345 


3416 


3513 


3577 


3824 


B I Tl 2 * 


1 oqoo 


831 


1464 


1543 








O2OOOO 


82* 


1467 


1516 


1547 


1756 


BIT14 » 


04OOOO 


811 


781 


1478 


1480 


1547 


BITIS " 


1 ooooo 


80« 


485 


572 


575 


596 


B1T2 » 


000004 


93i 


531 


712 


1156 




BiT3 » 


000010 


921 


1549 


1556 


2917 




B1T4 » 


000020 


911 


1139 


1162 


1164 


2166 






4537 










BIT5 » 


000040 


90f 


1661 


1761 


2109 


2219 




U U U 1 U V 


89* 


1144 


1145 


1551 


2488 


BIT7 * 


A ft ft ^ ft n 


88f 


1145 


1265 


1661 


2138 


BITS * 


000400 


87# 


1523 


1536 


1540 


1553 


BIT9 ■ 


001 ooo 


861 


1521 


1523 


1535 


1561 




007 q5 4 


ilB7» 


1492 








BRLVL 


012252 


1617 


1627 


1635 


1647* 




BHW 


003730 


718 


804* 








BPX 


003732 


719 


8051 








CALBCC 


027 320 


3006 


3035 


3081 


3110 


3156 


3627 


3657 


3678 


3754 


3797 






4305 


4351 


4553* 


4554 


4556* 


CHAR 


026534 


2566 


2614 


2651 


2688 


2725 


CH ARSD 


026646 


44S6t 










chrcnx 




963* 


966 


970 


986* 


1004* 


CK5WB 


007606 


512 


779 


811 


1026 


1212* 


CKSWRl 


0Q7666 


12251 


1237 








CKSWR2 


007700 


12284 












007704 


t230# 










CKS^'R4 


007710 


1231 Jf 


1239 


1246 






CKSWR5 


010014 


1213 


1220 








CIjKX 


OOl 242 


171* 










CliPiO 


027662 


2982 


3011 


3057 


3066 


3132 


CNEPR 


007 277 


626 


1187* 








CNT , MA 


OOl 702 


196 


3641 


484 


486 


488 


CNV-PT ■ 


104411 


2331 


623 


738 


740 


742 


CONERP 


007223 


621 


1187* 








CONN 


0071 14 


U87» 


1469 








COSTAS 


002776 


630 


64lt 








CONVRTm 


104410 


2311 


543 


629 


1076 


1391 


CORMAX 


032202 


47851 










CRAW 


006606 


11871 


1430 








CRC,CC« 


102010 


45751 










CRC16 « 


120001 


2984 


3013 


3059 


3088 


3134 






3846 


3918 


4202 


4296 


4574* 
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CREAM 


001320 


195* 


483* 


1289* 


1290 


1292* 


CSR 


006510 


1 187t 


1395 






CSPMAP 


010514 


1370« 










CTSDLy 


03O0S2 


47531 










CYCLE 


010060 


720 


761 


762 


1280* 




DATABP 


005216 


1049* 


1052 


1074 


1077* 




DATACL* 


104415 


24ii 


2093 


2137 


2141 


3201 






2354 


2355 


2369 


24U 


of J? 






2727 


2766 


2767 


2810 


2811 






3094 


3139 


3140 


3168 


3169 






3428 


3442 


3463 


3481 


3488 






3704 


3706 


3717 


3841 


3855 


DATAHD 




4104 


4109 


4115 


4169 


4720 


005204 


1046* 


1070 


1073* 






DELAY ■ 


104413 


2371 










DEVADP 


004370 


877* 


912 


923* 






DEVTAB 


003010 


583 


648t 








DHl 


031135 


47851 










DHIO 


031435 


47851 










DH2 


031156 


47851 










DH3 


0312U 


47851 










nH4 


031252 


47851 










DH5 


031312 


47851 










DH6 


031344 


4735« 










DH7 


031412 


47851 










OISPLA . 


001200 


142i 


496* 


504* 


735* 




DISPRE 


000174 


1281 


504 








DMACTV 


001306 


1891 


521 


676* 


677 


1260 


DHCM 


007320 


634 


1187* 






OHCROO 


001500 


279t 










DHCROi 


001510 


2841 










DMCP02 


001520 


289* 










DMCP03 


001530 


2941 










DMCP04 


001540 


2991 










DMCR05 


001550 


3041 










DMCR06 


001560 


3091 










DMCP07 


001570 


3141 










DMCRIO 


001600 


3191 










DMCRl 1 


001*10 


324i 










DMCP12 


001620 


3291 










DHCP13 


001630 


3341 










DHCR14 


001640 


339i 










DHCP15 


001650 


344# 










DMCB16 


001660 


3491 










DMCR17 


001670 


3541 










DMCSP 


001404 


2621 


568* 


602 


607* 


613* 






1356 


1678* 






0MC5RK 


001406 


263* 


1144* 


1145* 


1149* 


1155* 


DMCTL 


001410 


2641 


1309* 


1310* 


1311 


DMNUK 


001310 


190« 


479 


751 


1374* 


1389* 


DMP04 


001412 


2651 


1133* 


1139 


1176 


1181 


DMP06 




4622* 


4623* 






001414 


2661 


1150* 


1313* 


1314* 




DMBLVL 


001376 


2S9t 


1316* 


1317* 


1318 




DMRVEC 


001374 


258t 


768 


1299* 


1300* 


1316 


DMSlOO 


001502 


280f 
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3166 


3212 


324i 


4578* 










4737* 


4739* 


4740 


4742* 


4767* 








1449 


1532 


1545 












2239 
2764 

4095 


2290 
2845 

4159 


2341 
2940 
4199 


2393 
2991 
4293 


2451 
3056 


2479 
3131 


2507 
3206 


353S 
3279 


2889 
1556 
599 


2915 
1756 
1451 


2936 
2891 
1519 


2938 


4197 


4291 






2574 


2622 


2659 


2696 


2733 


4160 


4379 


4421 


2544 
2579 
1555 
1564 


2321 

4697 
1561 
1620 


2372 

1564 
1622 


3806 
1622 


4112 








3165 
3854 
4562 
2846' 


3231 
3875 
4563* 
4429* 


3280 
3924 
4564* 


3316 
3945 
4567 


33S2 
4021 
4572* 


3441 
4075 
4785 


3462 
421 1 


3606 
4267 


1005 
















3161 


3207 


3336 


4693* 










1293 
















744 


1060 


1062 


1122 


1228 








3163 


3309 


3336 


3384 


3350 


3439 


3600 


3651 
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SYMBOLS 
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3303 
2455 
3648 
3214 
3490 
3676 
4743 


2216 
2483 
2989 
3215 
3523 
3896 


2352 
2511 
2990 
3243 
3593 
3925 


2253 
2539 
3018 
3344 
3607 
3946 


2367 
2566 
3019 
3296 
3636 
3964 


2303 
2616 
3064 
3300 
3658 
3971 


2304 
2653 
3069 
3364 
3679 
3973 


2316 
2690 
3093 
3366 
3697 
3984 


1394 


1376* 


1577* 


1563* 


1564* 


1S88 


1613 




647 


765 


802 


1Q94 


1117 


1163 


1298* 


1307 


1156* 


1162* 


1164* 


1307* 


1308* 


1309 






1566* 
1311* 


1569 
1312* 


1578 
1313 


1580 
4366 


4379 


4431 


^4537 


4613* 
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D"^S10 I 




285 W 




DWS ! 02 


00 I «5 2 2 






DMSl 03 


OOI532 


2954 




DMS I 04 




3009 




DMS 1 05 


001552 


305 tt 




DMS106 


001562 






DMSl 07 


00 1 57 2 


315 4 




SI 1 


00 1 602 


320t 




DMSl 1 1 


1 6 1 2 


325 V 




DMSl I 2 


001622 


330V 




DMSl I 3 


00 1 632 


3 35 # 




DMSl 1 4 


001642 










345 1 




D"5 1 16 




3501 




DMS 1 1 7 


001 672 


355 V 






1 5 4 


28 1 i 




DMS2f) 1 


no 15 1 4 


286t 




DMS202 


001524 








00 1 5 34 


2961 




LJ n o ^ U 4 


00154* 


3011 




DWS205 


noi554 






DM Ci 

u ni {3 y 




3111 




DMS2 07 


001574 






riM o 4 n 

UMO iC 1 u 


001 604 


3211 




DMS2 1 1 


01 l6 1 4 


326 V 




DMS2 1 2 


001624 


3 3 i # 




DHS2 1 3 


001634 


3 36# 




DMS?1 4 


001644 


3411 




DMS2 1 5 


001654 






DMS2 1 6 


001664 


35l# 




DMS217 


001674 


356# 




DMS300 


00 1506 






DHS 30 1 


00 I5 1 6 






DMS302 


OOI526 






DMS30 3 


00 1 5 36 


297 # 




DMS304 


OOI546 


302# 








307 i 




DMS3 06 


001566 


3 1 2 V 




DW5307 


001576 


317# 




DMS310 


0O1606 


322t 




nMS3 1 1 


OOI6I6 


327 i 




DMS3 1 2 


001626 


332# 




DMS313 


001636 


337« 




DMS314 


001646 


342* 




DMS315 


001656 


3471 




DMS316 


001666 


3521 




DMS3 1 7 


001^76 


357# 




DMTLVL 


001 402 


2<»l# 


1 32v» 


D^TVEC 


00 1 400 


260 V 


1 3 1 8* 


DM. END 


001700 


359i 


1372 


DM, MAP 


OOI5OO 


195 


2781 


DONE 


003734 


7B4 


786* 


DTI 


031460 


4785V 




DTIO 


031612 


4785V 




DTI 1 


031634 


47851 




DT12 


031646 


4785V 





1321* 
1319# 



483 

eo6t 



1320 



536 
1216« 



1290 



1292 



1370 



1375 
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DT2 


011472 


4785V 






DT3 


031510 


47851 






DT4 


031522 


4785V 






DT5 


031534 


4785V 






DT6 


031552 


47851 






DT7 


031570 


47851 






EMI 


030152 


4785V 






EMIO 


030455 


4785* 






EHll 


03O5OI 


4785V 






RM12 


030530 


4785V 






EMI 3 


030554 


47851 






EMM 


030614 


4785* 






EM15 


030664 


47e5v 






EM16 


030705 


47e5V 






EM17 


030721 


4785f 






EM2 


030210 


4785t 






EH20 


030765 


47851 






EM21 


031006 


4785t 






EM22 


031023 


47851 






EM23 


031046 


4785# 






EM24 


031070 


4785i 






EH25 


031113 


47e5V 






EM3 


030253 


4785* 






EM4 


030317 


4785V 






EMS 


030361 


47851 






EM6 


030411 


4785# 






EM7 


030430 


4795# 






EDM 


027574 


3425 


3521 


3586 


EPCTOO 


001704 


3661 






ERCTOl 


OOI7IO 


3691 






ERCT02 


001714 


3721 






EPCT03 


001720 


375# 






ERCT04 


001724 


3781 






EBCT05 


001730 


3ei# 






EPCT06 


001734 


3841 






ERCT07 


001740 


397» 






EPCTIO 


001744 


390i 






ERCTU 


001750 


393V 






ERCT12 


001754 


396« 






EBCT13 


001760 


399# 






ERCTU 


001764 


402* 






ERCT15 


001770 


4051 






ERCT16 


001774 


4081 






ERCT17 


002000 


411* 






ERR 


002700 


593 


6lS# 


622 


ERRCNT 


001232 


163V 


747 


774 


EBRFLG 


001325 


2021 


481* 


733* 


EPRMSG 


005172 


1047* 


1065 


10681 


ERRPC 


002770 


624 


640t 




ERTABO 


005322 


1062 


10971 




EXIT ■ 


OOO205 


96# 






EXITER 


005252 


1082 


1087V 




FLAG 


030076 


4766# 


4785 




FLOAT 


002536 


585V 


591 




FLTDRT 


030106 


4205 


4215 


4219 


FY 


nn2566 


5941 


605 


609 



3933 



4217 



4221 



4225 



46611 



1087* 
795* 



4223 
615 



1305* 

1037* 



4230 



1064* 1123* 



47701 
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27 4*6 


3026 


3030 




3 105 






3251 


GETOO 


027434 


2997 


3001 


3072 




3147 


«i* r 




GFTSI 


0263lt> 


2205 


2209 


2256 


3260 


2307 


2311 


2 J9B 




347C 


3432 


3491 


3610 


3614 


3631 


3635 






3856 


3862 


3879 


3683 


3699 


3903 


3928 






4744 














HALTS 


005?22 


1033 . 


10798 












HILIM 


004366 


876* 


903 


92i# 










ICOUNT 


001222 


1591 


793 


798* 










INBUF 


007502 


846 


882 


12021 










INCHAR 


010020 


1231 


1259# 












I N I F L G 


00 i 3*4 


2019 


5o7 


52 f 


5 j4* 








INRDY 


027156 


2768 


2813 


2849 


2857 


2865 


3524 


3537 






3783 


398? 


4001 


4006 


4027 


4041 


4055 






4252 


4316 


4331 


4336 


45251 






INSTERa 


104404 


223# 


897 












INSTR « 


104 40 3 


2211 


1329 


1381 


1394 


1403 


1482 


1491 


INSTP2 


004166 


853 


865# 












INTTY 


01 2266 


1414 


1 43 i 


1441 


1454 


1470 


1655 1 




KMCM 


007330 


637 


1 1 87# 












LIMITS 


00431 4 


892 


903# 












LINE 


0070 16 


ll87i 


1483 












LOBITS 


004372 


878* 


907 


923t 


924 








LOCK 


001 220 


1S8# 


797* 


614 


816 


1 056 


1779* 


1795* 






2978* 


3010» 


3053* 


3085* 


3128* 


3160* 


3203* 


lokflg 


001 326 


2034 














LOLIM 


004364 


875* 


905 


9201 










LPCNT 


001224 


1601 


792* 


793 


796* 








LRC8 B 


000200 


45731 
















001234 


lS4f 


490* 


?32* 


IQ^ - 


1 03S* 


1124* 




LUTYPE* 


u 


1 


4545 












HASKX 


001244 


1721 














MASTEK 


006142 


1058 


ll87i 












HCRLF 


O0f5672 


831 


954 


1054 


1055 


1063 


11871 


1328 


MCSRX 


006072 


737 


li87» 












MDATA 


007544 


984 


994 


1204# 










mehlih 


001304 


188» 


700# 












MEpASS 


005733 


736 


iie7# 












HFRRPC 


006217 


1061 


1 187lt 












MERPX 


00b 1 17 


743 


1187# 












MEPP2 


005760 


11871 


1590 












MERP3 


OO6005 


673 


11871 












HESDAT 


030102 


2949 


3417 


3423 


3514 


3519 


3578 


3584 




3836 


3911 


3966 


4040 


4096 


4101 


4106 


HESLD 


027620 


2948 


3422 


3516 


3583 


358? 


3830 


3835 






4308 


4674# 












H IL" 


001 322 


196# 


464* 


745 


1288* 


1293* 


X«»7 




MLOCK 


006043 


714 


11971 












MNEW 


006144 


66B 


11871 












MOOU 


006704 


ll87t 


1455 












MPASSX 


0061O6 


741 


1187« 












HPFAIL 


005675 


1121 


1187i 












MOM 


005666 


861 


11871 


1352 


1427 


1437 


1447 


1462 


MR 


005755 


723 


11871 


1346 










MRESETs 


004000 


95- 














MSTCLR* 


1^4412 


235» 


1126 


1725 


1749 


1781 


1823 


1865 
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2129 


2187 


2238 


2289 


2340 


2392 


2450 






2685 


2732 


2759 


2600 


2844 


2868 


2935 






3412 


3512 


3573 


3820 


4094 


4197 


4196 


HTITLE 


OOlOOO 


1361 


511 












MTSTN 


006130 


1059 


11871 


1330 










HTSTPC 


006031 


1187# 














MVECX 


ooeioo 


739 


U87i 












NEXT 


0'Ji2i6 


157* 


799 


1091 


16?«» 


l?00* 


1?23* 


1747* 






2016* 


2050* 


2083* 


2127* 


3169* 


2336* 


2287* 






2561* 


2609* 


2646* 


2683* 


2720* 


2757* 


2798* 






3202* 


3276* 


3342* 


3410* 


3510* 


3571* 


3816* 


NITCH 


026346 


4366* 


4367* 


4369* 


4369* 


437l# 






NOACT 


007154 


523 


11871 


1282 










NODEV 


002674 


577 


6l6f 












NUM 


006450 


11871 


1382 












OCOP 


026350 


2092 


2136 


2198 


2249 


3300 


3351 


3410 






4103 


4108 


4168 


4226 


4312 


43741 


4380 


OK 


002646 


603 


610# 


639 










ONE 


001302 


187« 


4785 












OUTRDY 


026502 


2189 


2194 


2240 


2249 


2291 


2296 


2342 






3517 


3982 


3629 


4099 


4164 


4394 


4403 






4494 


4589 


4596 


4635 


4651 


4665 


4682 


PACTOO 


001702 


365# 














PACTOl 


001706 


3681 














PACT02 


001712 


3711 














PACT03 


001716 


3741 














PACT04 


001722 


377* 














PACT05 


O01726 


380« 














PACT06 


001732 


3631 














PACT07 


001736 


3661 














PACTIO 


001742 


3891 














PACTll 


001746 


3921 














PACT12 


001752 


3951 














PACT13 


001756 


3981 














PACT14 


001762 


40H 














PACT15 


001766 


4041 














PACT16 


001772 


407« 














PACT17 


001776 


4101 
























1 5»S 








PARA Ml 


004234 


88lt 


698 












PARBITb 


040000 


961 














PAREPR 


004310 


664 


886 


886 


897t 


904 


906 


906 


PASCNT 


001230 


162# 


734* 


735 


746 


771 


1304* 




PERFOR» 


004537 


961 














PFTAB 


005430 


1122 


11281 












POPRO ■ 


012600 


721 


1086 












■POPlSP* 


005726 


701 














P0P2SP" 


022626 


741 


601 












PRIO 


006547 


11871 


1413 












PS a 


177776 


63« 


476* 


711* 


1617* 


1627* 






PUSHROa 


010046 


71i 


1083 












PUSHlSa 


005746 


69f 














PUSH2S> 


024646 


731 














QV.FLG 

RESREG 


001327 


204t 


462* 


750* 


790 








0US220 


1075 


1078# 












RESTAR 


O05350 


1108 


11141 













3255 


3372 


3376 


46161 






3226 


33C6 


3310 


46Q6« 






2362 


2417 


2431 


3445 


3449 


3466 


3661 


3665 


3682 


3686 


3698 


3707 


3932 


3949 


3953 


3965 


3974 


43601 


3542 


3720 


3734 


3739 


3763 


3777 


4060 


4116 


4126 


4134 


4231 


4247 


1821* 


1837*. 


1863* 


1886* 


1921* 


1941* 


3235* 












1390 












3566 


3644 


3719 


3762 


3825 


3831 


4166 


4299 


4309 


4315 


47681 




410.0 


4105 


4165 


4214 


4218 


4222 


1476 












1923 


1974 


1996 


2016 


2053 


2085 












PAGEi { 


2478 


2506 


2534 


2563 


2611 


2648 


2980 


3055 


3130 


3205 


3278 


3344 


4290 












1778* 


1820* 


1862* 


1920* 


1972* 


1994* 


2336* 


2390* 


2446* 


2476* 


2504* 


2532* 


2843* 


2886* 


2933* 


2977* 


3052* 


3127* 


4092* 


4155* 


4194* 


4288* 






3297 


3363 


3426 


3522 


3591 


3839 


4410 


4452 


4468 


4509 


4603 


4688 


2347 


2397 


2401 


2406 


2429 


3421 


4414t 


4439 


4448 


4461 


4465 


4465 
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TABLE 


USEP 


SYMBOLS 


D IT C T D T 

nc.5 1 r i 


? ^ ^ n ^ 




749 


753 


761* 










R E S (' S * 






229# 


1078 












D C T 1 1 D u 


001214 




156# 


492* 




7 24 


76l# 


799* 


803 


r< ' J rn ^ Lf n * 


10*414 




239* 


1134 


1137* 


! hI? 


1179 


16B0 


1703 








1826 


1828 


18 39 




1871 


1873 


1892 








1997 


2021 






2057 


2061 


2088 








2143 


2153 


2163 


2191 


2196 


2217 


2242 








2349 


2370 


2399 


2403 


2408 


2431 


2456 








2618 


2627 


2655 


2664 


2692 


2701 


2729 








2866 


2895 


2698 


2907 


2910 


2942 


2946 








3357 


3361 


3391 


3525 


3538 


3543 


3552 








3783 


3792 


3988 


4002 


4007 


4016 


4028 








4127 


4135 


4161 


4170 


4232 


4248 


4253 








4377 


4392 


4396 


4399 


4405 


4408 


4419 








4483 


4487 


4490 


4496 


4516 


4518 


4535 








4633 


4637 


4640 


4653 


4656 


4667 


4669 


RUN 


... 




1931 


48S» 




1 287* 


1294 






SAVACT 


nni 11 ^ 




i9ii 


671 


1586* 










SAVNUM 


001114 




192» 


479* 


746* 


75 1* 


1581* 






SAVPC 


001276 




185* 


623* 


642 


929* 


1099 






SAVRO 


001 2 " " 




1781 


938* 


943 


4785 








SAVP 1 






179# 


628* 


937* 


944 








SAVR2 


001264 




1801 


936* 


945 


4785 








SAVP3 


0012^6 




181* 


935* 


946 


4785 








SAVR4 


001270 




1821 


934* 


947 


4785 














1831 


933* 


948 


4785 








«4\/«D 


001274 




184* 














SAV05 B 


1 u *» <t uo 




227« 


1038 












SCHAB 






2760# 


2601* 


. 

4477 


4495 


4500 


4504* 


4505 


SCOPE s 


1 (M Ann 

J U "T 1^ u u 




215» 


1688 


1711 


1735 


1766 


1808 


1850 








2114 


2171 


2222 


227 3 


2324 


2375 


2436 








2671 


2708 


2745 




2828 


2873 


2921 








3396 


3497 




3800 


4078 


4143 


4178 


SCOPl ■ 


104401 
4 




217# 


1794 


1807 


1 8 36 


1849 


1882 


1903 








3lS9 


3188 


3234 


3 263 








SILOLD 


0267 1 2 




2765 


2781 


3809 


28 25 


4472* 






SIMBCC 


027212 




2992 


3021 


3067 


3 096 


3142 


3171 


3217 








3850 


3920 


4207 




4545* 






SKIP 


002632 




573 


576 


597 


600 


606* 






SOFTSW 


010052 




1229 


1268* 


















3834 














SPACNTo 


0^471 3 




964* 


988 


991* 


10051 








SPEED 


007 340 




1187# 


1440 














U ij 1 / u u 




641 


477 


690 


1 093 


1116 






STAT 


no 1240 




1701 














STATl 


001 3^6 




251* 


1301* 


1756 


1758 


2889 


2891 


2915 


STAT2 






252* 


1302* 


1978 


2000 








STAT3 


001372 




253* 


1303* 












STFFCK 


027762 




4727* 














STFFCL 


027702 




4501 


4705* 












STRTSW 


001236 




169* 


5l3» 


516* 


517 


519 


539 


531 








1601 














STUFDT 


030126 




4776* 














STUFLG 


027154 




2761* 


2802* 


4498 


4512* 


4533f 






SV05 


00440? 




933* 














SrtFLG 


010016 




480* 


835 


1334* 


1251* 


13571 
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TABLE — 


USER SYMBOLS 


SWMES 


007205 




1187* 


1227 












SWMESl 


007215 




1187* 


1230 












SWR 


001202 




143* 


497* 


499 


503* 


513 


671 


676 








1081 


1088 


1090 


1153 


1212 


1250* 




SWREG 


000176 




129* 


503 


. 1313 


1370 








swoo « 


OOOOOl 




45* 


517 


1377 


1601 








SWOl s 


000002 




44* 


731 


1323 


1347 








SW02 ■ 


000004 




43* 














SW03 X 


OOOOlO 




42* 


666 












5W04 s 


000020 




411 














SW05 » 


000040 




40* 














SWOb « 


000100 




39* 


1153 












5W07 a 


O00200 




381 














SW08 B 


000400 




37* 


1088 












SW09 s 


001000 




36* 


812 












SWIO « 


002000 




35* 


1090 












swu ■ 


004000 




34* 


788 












SH12 ■ 


010000 




33* 


827 


1037 










SW1 3 = 


020000 




33* 


1033 












SWH » 


040000 




31* 














SW15 « 


100000 




30* 














SYMC 


026366 




2453 


2481 


3509 


3537 


4384« 








027464 




3265 


3351 


3420 


3516 


3581 


3828 


409ft 


TEMP 


001416 




271* 


971 


1118* 


1119* 


1160* 


1165* 


1171* 


TEMPI 


001246 




173* 


537* 


1189 


1613* 


1614* 


4389* 


4401* 








4551» 


4565* 


4585* 


4596* 


4631* 


4642* 


4661* 


TEMP2 


001250 




1741 


538* 


1191 


3751* 


3752* 


3753 


3794* 








4073* 


4074 


4264* 


4365* 


4366 


4348* 


4349* 








4480« 


4507* 


4514* 


4553* 


4557* 


4583* 


4599 


TEMP3 


001252 




175* 


540* 


566* 


618 


637* 


1193 


1386 








3753# 


3754 


3780* 


3781* 


3796* 


3797 


4004* 








4075 


4250* 


4251* 


4266« 


4267 


4334* 


4335* 








4785 














TEHP4 


001254 




176* 


541* 


1195 


1399 


1403 


1408 


1411 


TEMPS 


001256 




177* 


543* 


1197 


1380* 


1393* 


1599 


4417* 


TIMER ■ 


104416 




243* 


2059 


2569 


2617 


2654 


2691 


2728 


TKCSB 


001204 




148* 


848 


1214 


1259 


1655 


4759 




TKDBR 


O01206 




14^* 


850 


856 


1217 


1219 


1261 


165,7 


TLAST ■ 


026000 




1350 


4355* 












TPC5H 


001210 




150* 


832 


854 


1029 


1363 


1658 




TPDBR 


001212 




151* 


834* 


856* 


1031* 


1264* 


1660* 




TRPOK 


004730 




1017* 














TSTNQ 


001226 




161* 


491* 


1102 


1130 


1334 


1341 


1343 








1861« 


1919* 


1971* 


1993* 


2015* 


2049* 


2082* 








2447* 


2475* 


2503* 


2531* 


2560* 


3608* 


2645* 








2932« 


2976* 


3051* 


3136* 


3201* 


3275* 


3341* 








4193# 


4387* 












TSTl 


012320 




1337 


1355 


1675* 










TSTIO 


013326 




1862 


1919* 












TSTU 


013S02 




1920 


1971* 












TST12 


013544 




1972 


1993* 












TST13 


01 3606 




1994 


2015* 












TSTl 4 


013706 




2016 


2049* 












TST15 


014006 




2050 


2082* 












TSTU 


014144 




2083 


2136* 












T5T17 


014342 




2127 


2184* 













1092* 


1095 


1127 


1345* 


1355* 


1357 


1727 


1751 


1784 


1786 


1797 


1799 


1894 


1928 


1930 


1946 


1948 


1975 


2090 


2095 


2105 


2132 


2134 


2139 


2247 


2268 


2293 


2298 


2319 


2344 


2484 


2512 


2540 


2570 


2580 


2582 


2738 


27A9 


2807 


2813 


2850 


2858 


2954 


3287 


3291 


3295 


3325 


3353 


3721 


3735 


3740 


3749 


3764 


3778 


4042 


4056 


4061 


407Q 


4110 


4117 


4262 


4317 


4332 


4337 


4346 


4364 


4437 


4441 


4444 


4450 


4463 


4466 


4587 


4591 


4594 


4600 


4610 


4620 


4684 


4698 


4700 








4511* 


4521* 










1908 


1960 


1982 


2004 


2037 


2070 


2464 


2492 


2520 


2548 


2597 


2634 


2964 


3039 


3114 


3189 


3264 


3330 


4273 


4354 










1937 


1955 


3009 


3038 


3084 


3113 


3246 


3301 


3367 


3437 


3603 


3653 


3936 


2938 


4197 


4391 
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712 


721 


1333 


1347* 
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2034* 




4435* 


4446* 


4481* 


4492* 


4533* 


4539* 


4666* 












3795* 


3796 


4018* 


4019* 


4020 


4072* 


4350 


4433* 


4449 


4459* 


4462 


4476* 


1369 


1501* 


3540* 


3541* 


3737* 


3738* 


4005* 


4030* 


4021 


4058* 


4059* 


4074* 


4350* 


4351 


4711* 


4721* 


4734* 


4747* 


1487 


1490 


1496 


1499 






4433* 












2897 


3909 


2944 








1675* 


1699* 


1722* 


1746* 


1777* 


1619* 


2126* 


3184* 


2335* 


3386* 


2337* 


2389* 


2682* 


3719* 
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TST2 


012374 




1676 


1699# 
























TST?0 


014524 




2185 


2235# 
























TST2 1 


014706 




2236 


2286# 


























015070 




22B7 


233"^ # 
























TST23 


v>l 5252 




2338 


2389# 
























TST24 


15460 




2390 


2447# 
























TST25 


0155 46 




2448 


2475# 
























TST26 


015636 




2476 


2S03«r 
























TST27 


015724 




2504 


253li 
























TST3 


01 2442 




1 700 


1722* 
























TeT30 


016014 




2532 


2560« 
























TST31 


f)l&ife6 




256 1 


2608« 
























T5T32 


016302 




2609 


26451 
























TST33 


016420 




26 46 


26821 
























TST34 


01 6536 




2683 


27l9# 
























TST35 


016654 




2720 


2756# 
























TST36 


017004 




2757 


2797* 
























TST37 


'U7144 




2798 


28411 
























TST4 


012514 




1723 


1746# 
























TST40 


017304 




28 42 


2885# 
























TST41 


01 7466 




2866 


29321 
























TST42 


017632 




2933 


29761 
























TST43 


020146 




2977 


30Sli 
























TST44 


020462 




3052 


3126# 
























TST45 


020776 




3127 


32011 
























TST46 


021312 




3202 


3275t 
























TST47 


02I5SO 




3276 


334t# 
























TST5 


01 2616 




1747 


17771 
























TST50 


022006 




3342 


34091 


























n22340 




3410 


3509« 
























TST52 


022S42 




3510 


3570« 
























TST53 


023642 




3571 


3817» 
























TST54 


025042 




3818 


40911 
























TST55 


025374 




4092 


41541 
























TST56 


025412 




41S5 


4i93# 
























TST57 


0?6000 




4194 


4287« 


4355 






















TST& 


012756 




1778 
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TST60 • 




U 


4268 


























TST7 


013116 




1620 


16611 
























TTST 


003612 




715* 


716# 


718» 


719# 


782* 


















TWOSYNs 


OlOoOO 




96# 


























TYPDAT 


005206 




1053 


1071 


10741 






















TYPE s 


104402 




2191 


511 


523 


535 


620 


625 


633 


636 


668 


673 


714 


723 


736 








737 


739 


741 


743 


831 


844 


861 


954 


994 


1054 


1055 


1056 


1059 








1061 


1063 


1067 


1072 


1121 


1227 


1230 


1282 


1328 


1346 


1352 


1390 


1412 








1426 


1429 


1436 


1439 


1446 


1452 


1461 


1468 


1475 


1590 








TYPMSG 


005106 




1051 


1054# 
























VEC 


0065 26 




1 18?# 


1404 
























VECMAP 


012010 




1589 


16011 
























WHICH 


OI20O2 




1392 


1397? 
























WRDCNT 


004710 




962* 


995* 


1003* 






















WRKO.f 


005174 




1066 


1069« 
























XBX 


005000 




1028 


1030 


1032* 






















XCSP 


O03546 




738 


7631 
























XEPP 


003570 




744 


772* 
























XHEAD 


006224 
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XLOC 


003022 




593* 


611« 


614 


645 


658* 


















XPASS 


003562 




742 


769# 
























XPOLY 


027316 




2984* 


3013* 


3059« 


3088* 


3134* 


3163* 


3209* 


3238* 


3284* 


3350* 


3435* 


3600* 


3651* 








3848* 


3918* 


4202* 


4296* 


4561 


4563 


4571*. 














XSTATO 


007454 






11871 
























XTSTN 


005330 




1 060 


11001 
























XVEC 


003554 




740 


766t 
























ZERO 


001300 




1861 


4785 
























































SCPAP « 


177777 




1 # 


1665* 


1666 


1671* 


1689* 


1692 


1695* 


1712* 


1715 


1718* 


1736* 


1739 


1742* 








1 767 # 


1770 


17731 


1809* 


1812 


18151 


1851 * 


1854 


1857* 


1909* 


1912 


1915* 


1961* 










1967* 


1983* 


1986 


1989* 


20051 


2008 


2011* 


2038* 


2041 


2045* 


20719 


2074 








20?8# 


21151 


2118 


2122* 


2172* 


2175 


2180* 


22.23* 


2226 


2231* 


2274* 


2277 


2282* 








2325# 


2328 


23331 


2376* 


2379 


2385* 


2437* . 


2440 


2443* 


2465* 


2468 


2471* 


2493* 








2496 


24991 


2521* 


2524 


2527* 


25 49* 


2552 


2556* 


2598* 


2601 


2604* 


2635* 


2638 








2641 1 


2672t 


2675 


2678* 


27091 


2712 


2715* 


2746* 


2749 


27521 


2785* 


2788 


2793* 








28291 


2832 


2837* 


2874* 


2877 


2881* 


2922* 


2925 


2928* 


2965* 


2968 


2972* 


3040* 








3043 


3047# 


3115* 


3118 


3122# 


3190* 


3193 


3197* 


3265* 


3268 


3271* 


3331* 


3334 








33371 


33971 


3400 


3405* 


3498* 


3501 


3505* 


3555* 


3558 


3566* 


3801* 


3804 


3813* 










4082 


4087* 


4144* 


4147 


4150* 


4179* 


4182 


4189* 


4274* 


4277 


4283* 




8ENDAD 


003522 




123 


509 


755* 


1079 




















SN * 


000057 




1 K 


1665 


1671 


1673 


1678* 


1689 


1695 


1697 


1702* 


1712 


1718 


1720 


1725 








1 726 i 


1736 


1742 


1744 


1749 


1750* 


1767 


1773 


1775 


1761 


1782* 


1809 


1615 








1817 


1823 


1624* 


1851 


1857 


1859 


1665 


1866* 


1909 


1915 


1917 


1923 


1924* 








ift^ i 


196? 


1969 


1974 


1975* 


1983 


1989 


1991 


1996 


1997* 


2005 


201 1 


2013 








2018 


20191 


3038 


2045 


2047 


3052 


2053* 


2071 


2078 


2080 


2085 


2086* 


2115 










2124 


2129 


2130* 


2172 


3180 


2182 


2167 


2188* 


2223 


2231 


2233 


2238 








22391 


2274 


2282 


2284 


2289 


3390* 


2325 


2333 


2335 


2340 


2341* 


2376 


2365 








2387 


2392 


2393* 


2437 


2443 


2445 


2450 


2451* 


2465 


2471 


2473 


2478 


2479* 








2493 


3499 


2501 


2506 


2507* 


2521 


2527 


2529 


2534 


2535* 


2549 


2556 


2558 








2563 


2564* 


2598 


2604 


2606 


2611 


2612* 


2635 


2641 


2643 


2648 


2649* 


2672 








2678 


2680 


2685 


2686* 


2709 


37 15 


2717 


2722 


2723* 


2746 


2752 


2754 


2759 








27601 


2785 


2793 


2795 


2800 


2801* 


2829 


2837 


2839 


2844 


2845* 


2874 


2681 








2883 


2888 


2889* 


2922 


2928 


2930 


2935 


2936* 


2965 


2972- 


2974 


2980 


2981* 








3040 


3047 


3049 


3055 


3056* 


3115 


3122 


3124 


3130 


3131* 


3 190 


■ 3197 


3 199 








3205 


32061 


3265 


3271 


3273 


3278 


3279* 


3331 


3337 


3339 


3344 


3345* 


3397 








3405 


3407 


3413 


3413* 


3498 


3505 


3507 


3512 


3513* 


3555 


3566 


3568 


3573 








35744 


3801 


3813 


3815 


3820 


3821* 


4079 


4Q87 


4089 


4094 


4095* 


4144 


4150 








4152 


4157 


4158* 


4179 


4189 


4191 


4196 


4197* 


4274 


4383 


4285 


4290 


4291* 


SS s 


000061 




1# 


1676 


1678* 


1700 


1702* 


1723 


1726* 


1747 


1750* 


1778 


1782* 


1820 


1824* 








1 862 


18661 


1920 


1924* 


1972 


1975* 


1994 


1997* 


2016 


2019* 


2050 


2053* 


2083 








2096* 


2127 


2130i 


2185 


2188* 


3336 


2239* 


2287 


2290* 


2338 


2341* 


2390 


2393* 








2448 


24511 


2476 


2479* 


2504 


25071 


2532 


25351 


2561 


2564* 


2609 


2612* 


2646 








26491 


2683 


2686* 


2720 


27231 


2757 


2760* 


2798 


2801* 


2642 


2845* 


2886 


2869* 








2933 


29361 


2977 


2981* 


3Q52 


3056* 


3127 


3131* 


3202 


3206* 


3276 


3279* 


3342 










3410 


3413* 


3510 


3513* 


3571 


3574* 


3818 


3821* 


4092 


4095* 


4155 


4158* 


»Y « 






4194 


41971 


4288 


4291* 




















000017 




1 1 


207i 


215 


217* 


219* 


221* 


223* 


225* 


227* 


229* 


231* 


233* 


235* 








2371 


2391 


241* 


243* 




















• * 


032302 




lost 


109 


112* 


119* 


134* 


127* 


131* 


135* 


137* 


189* 


190* 


,191* 


192* 








2731 


2771 


279* 


280* 


281* 


282* 


264* 


285* 


266* 


287* 


289* 


290* 


291* 








292t 


2941 


295* 


296* 


297* 


299* 


300* 


301* 


302* 


304* 


305* 


306* 


307* 








309f 


310» 


311* 


312* 


314* 


315* 


316* 


317* 


319* 


320* 


321* 


322* 


324* 








3251 


3261 


327* 


329* 


330* 


331* 


332* 


334* 


335* 


336* 


337* 


339* 


340* 








341« 


342f 


344* 


345* 


346* 


347* 


349* 


350* 


351* 


352* 


354* 


355* 


356* 
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357# 


515 






1378 


1422 






3975 




.BEGIM 


00.M52 


690* 




.CNVfiT 


004472 


234 


955» 


,CONVR 


004466 


232 


954« 


,DATAC 


005552 


242 


1159# 


.DELAY 


005436 


239 


1132# 


,EOP 


003364 


731» 


4288 


,EPRTA 


031660 


1046 


4785# 


,HLT 


004750 


115 


10261 


,1NSTE 


004154 


224 


861 1 


,INSTP 


004050 


222 


640* 


,IHSTl 


004070 


844# 


864 


(MSG 


004072 


842* 


845* 


.MSTCL 


005466 


236 


1143# 


,PARAM 


004174 


226 


872» 


,PFAIL 


005336 


113 


478 


,RE.S05 


004434 


230 


943# 


,ROMCL 


005504 


240 


ll48i 




rt A ^ T A 

0*3 f 




929l 


IsCOPE 


003576 


216 


779# 


.SCOPl 


003736 


21B 


811» 


.START 


002002 


132 


4761 


.TIMER 


005616 


244 


U70# 


.TRPSR 


004716 


117 


10141 


.TRPTA 


001330 


2141 


1019 


.TYPE 


003766 


220 


8221 



525 
1542 



6571 
1546 



675 
1593 



1110 
1624 



1120 
1656 



1 lft8» 
1659 



1203* 
2690 



1 2051 
2916 



1260 
2937 



1263 
3492 



1284 

370e 
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DMEND 


1* 


725 




























DMFPNT 


11 






























HLT 


75* 


1687 


1710 


1734 


1765 


1793 


1806 


1835 


1848 


1881 


1902 


1936 


1954 


1981 


2003 




2027 


2036 


2068 


2102 


2112 


2150 


2160 


2169 


2207 


2211 


2221 


2258 


2262 


2272 


2309 




2313 


2323 


2360 


2364 


2374 


2419 


2433 


2463 


2491 


2519 


2547 


2577 


2589 


2596 


2625 




2633 


2662 


2670 


2699 


2707 


2736 


2744 


2775 


2819 


2856 


2864 


2872 


2905 


2920 


2963 




2999 


3003 


3028 


3032 


3074 


3078 


3103 


31t>7 


3149 


3153 


3178 


3182 


3224 


3228 


3253 




3257 


3308 


3312 


3374 


3378 


3447 


3451 


3468 


3472 


3484 


3493 


3531 


3550 


3612 


3616 




3633 


3637 


3663 


3667 


3684 


3688 


3700 


3709 


3727 


3747 


3756 


3770 


3790 


3799 


3860 




1864 


3881 


3eR9 


3901 


3905 


3930 


3934 


3951 


3955 


3967 


3976 


3994 


4014 


4023 


4034 




4048 


4068 


4077 


4114 


4123 


4133 


4141 


4177 


4238 


4260 


4269 


4323 


4344 


4353 


4425 




4541 


4746 




























$ABOPT 
































SAUTD 




547 




























SBCC 




2965 


3040 


3115 


3190 






















SBINCR 




3265 


3331 


























SBINWI 




2376 




























SBUFFE 




1 199 




























SCDATA 




4179 


4274 


























SCLOCK 




2005 




























SCOMP 




2572 


2584 


2591 


2620 


2629 


26S7 


2666 


2694 


2703 


2731 


2740 


2652 


2860 


2868 




2900 


2912 


3545 


3742 


3785 


4009 


4063 


4255 


4339 














SCPC 




2982 


3011 


3057 


3086 


3132 


■3l«l 


3207 


3236 














SCPCSH 




3279 


3345 


























SCYCLE 




1271 




























«EHPTY 




4079 




























SEOP 




725 




























SFINI 




4355 




























SFLAG 
































SFLOAT 




1867 


1887 


1925 


1942 






















SGEXPA 
































$HALF 




4144 




























SHEADE 
































JINACT 




2437 


2465 


2493 


2521 






















SINIT 
































SLINEl 




1851 


1909 


























»LUI 




1665 


1689 


1712 


1736 






















tLU12 




1767 




























$LU17 




1809 




























SMARHI 
































8MARK 




2829 




























SMATCH 




3534 


3730 


3773 


3997 


4051 


4243 


4327 
















SMOCK 
































SMODEM 




2874 




























8MSG 




1187 




























$MULT 
































JPATTE 




2746 


2788 


























$PFAIL 




1103 




























$0001 




4606 


4616 


























SQUE5T 




1381 


1394 


1403 


1482 


1491 




















9RAMCL 




1131 




























SRCLK 




1134 


1137 


1174 


1179 


1660 


1703 


1727 


1751 


1784 


1786 


1797 


1799 


1826 


1828 




1839 


1841 


1871 


1873 


1892 


1894 


1928 


1930 


1946 


1948 


1975 


1997 


2021 


2030 


2055 




2057 


2063 


2088 


2090 


2095 


2105 


2132 


2134 


2139 


2143 


2153 


2163 


2191 


2196 


2217 




2242 


2247 


2268 


2293 


2298 


2319 


2344 


2349 


2370 


2399 


2403 


2408 


2431 


2456 


2484 




2512 


2540 


2570 


2580 


2582 


2618 


2627 


2655 


2664 


2692 


2701 


2729 


2738 


2769 


2807 
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2813 


2850 


2858 


2866 


2895 


2fi98 


2907 




^353 


3357 


3361 


3391 


3525 


3538 


3543 




3792 


3988 


4002 


4007 


4016 


4028 


4042 




4170 


42 32 


4248 


42S3 


4262 


4317 


4332 




4409 


4419 


4437 


4441 


4444 


J4S0 


4463 




4587 


4591 


4594 


4600 


4610 


4620 


4633 




4700 














«RCRC 


1# 


3498 












8BEC 


11 


2549 


2598 


2635 


2672 


2709 




sscnpE 


m 


775 












SSJWBC 


1* 


4545 














IS 














SSOFTC 


i« 


1207 












SSTUFF 


u 














«5WPAC 


i» 


1961 


1983 










STCHAR 


i« 


3416 


3513 


3577 


3824 






STCPC 


i« 


3397 


3555 


3801 








STPANW 


11 


3435 


3600 


3651 


3648 


3918 




STRANl 


11 


2038 


2071 


2115 








STPPOt; 


li 

343 


215 


217 


219 


221 


223 


225 


8TSTN 


1« 


1673 


1697 


1720 


1744 


1775 


1817 




2182 


2233 


2284 


233S 


2387 


2445 


2473 




2795 


2839 


2883 


2930 


2974 


3049 


3124 




4152 


4191 












SVARIA 


1« 


134 












SWINDO 


1» 


2172 


2223 


2274 


2325 






sxz 


1* 


1665 


1671 


1689 


1695 


1712 


1718 




1909 


1915 


1961 


1967 


1983 


1989 


2005 




4 an 


2223 


2231 


2274 


2282 


2325 


2333 




2521 


2527 


2549 


2556 


2598 


2604 


2635 




2793 


2829 


2837 


2874 


2881 


2922 


2928 




3265 


3271 


3331 


3337 


3397 


3405 


3498 




41!(0 


4179 


4189 


4274 


4283 







S ZEROS li 



PAGE: 0125 

- 41ACR0 NAMES 



2910 


294.2 


29^^ 


2953 


3287 


3291 


3295 


3325 


3552 


3721 


3T35 


374Q 


3749 


3764 


3778 


3783 


4056 


4061 


4070 


4110 


4117 


4127 


4135 


4161 


4317 


4346 




4377 


4392 


4396 


4399 


44C5 


4466 


4483 


44S7 


4490 


44Sk6 


4&16 


4518 


4535 


4637 


464^0 


4«53 


4616 


4667 


4669 


4684 


4698 


227 


229 


^31 


233 


235 


237 


239 


241 


1859 


1917 


1969 


1991 


2013 


2047 


2080 


2124 


2501 


2529 


2558 


2606 


2643 


2680 


2717 


2754 


31M 


3273 


3339 


3407 


3507 


3568 


38 IS 


4089 


1736 


1742 


1767 


1773 


1809 


1815 


1851 


1857 


2011 


2PM 


2045 


2071 


2078 


2115 


2122 


2172 


2374 


13.85 


2437 


2443 


a4^f 


2471 


3493 


2499 


2«41 


261? 


^78 


2709 


2715 


2746 


2752 


2785 


2965 


2972 


3040 


3Q47 


3115 


3122 


3190 


3197 


3505 


35*5 


3&&6 


3801 


3813 


4079 


4087 


4144 



, ABS, 032202 000 



ERRORS DETECTED! 

DZDME,DZOME/SOL/CRF.IPtjUTL»DZDHE 
PUN-TIME: 16 22 1 SECONDS 
RUN-TIME RATIOS 779/39»19,5 
COPE used: 31K (61 PACES) 



I 



